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前 閉 「 パ ソ ュ ン ・ グ ラフ ィ ッ クス の 作り 方 楽し み 方 」 を 出版 し て 約 2 年 , 読者 の 皆さま か ら 数 々 の 
激励 や ご 批評 を いた だ きま し た 。 そ の 間 , X 1 シリ ー ズ も 高密 度 ・ 高 性 能 化 し , X 1 ター ボ シ リ ー ズ 
へ と 発展 し , まさ し く パ ペッ コン 実用 化 時 代 の 先 黄 を きる シリ ー ズ へ と 成長 し まし た 。 メ モリ ー 容 量 も 
8 ビッ ト 機 で は 最高 と も 言え る まで に 増設 され , 高級 機種 で し か で き な か っ た , 複雑 な アプ リ ケ ー シ 
ョ ン ・ ソ フト ウェ ア を 組む こと も 可能 と な っ て きま し た 。 本書 で は , 最高 機種 し し て の ハー ドウ ェ ア 
に ぁ ふさ わし い ア プリ ケー ショ ン の いく つか を , 紹介 し た いと 思い ます 。 

3 次元 グラ フィ ックス は , コン ピュ ー タ で 図形 を 表現 する うえ で 非常 に 魅力 ある 方 法 と いえ ます 。 
その 図形 デー タ の 持ち 方 は ハー ドウ ェ ア の 記憶 容量 , 計算 スピ ー ド 等 の 性 能 に 負う と ころ が 大 で す 
が , それ を 動か す た め の ソフ トウ ェ ア し だ いで , どん な も の で も 表現 で きる まで に な り ま し た 。 若干 
の スピ ー ド の 遅 さ と 類 わ し ささ え ぇ 我慢 すれ ば ぱ , 何 百 万 円 , 何 千 万 円 も する コン ピュ ー タ に さえ 負け ず 
に 動か せる よう に な り ま す 。 

本 書 で 紹介 する ソフ ト は , 私 た ち が 住 ん で いる 3 次 元 空間 の 物体 を , パソ ュ ン で 表現 し よう と いう 
も の で す 。 3 次 元 物体 を * ソ ュ ン で 表現 する に は , 点 と 線 で 表す 方 法 , 面 で 表す 方 法 , 中 身 の 詰まっ 
た 物体 (リッド ) と し て 表す 方 法 な どい ろ い ろ な 手法 が あり ます 。 本 書 で は , パソ コン と いう ハー 
ドウ ェ ア を 考え て , より スピ ー デ ィ に , より リア ル に 表現 する た め に , 3 次 元 を 点 と 線 , それ に 面 で 
表現 する 方 法 に つい て 基礎 か ら 解 説 し て いま す 。 皆 さん に と っ て は , ディ スプ レイ 画面 に 現れ る グラ 
フィ ックス の 世界 が , あま り に ゃ 自由 に 変化 する た め , 自分 の いる 位置 すら 見 失っ て し まう か も し れ 
ませ ん 。 焦ら ず に 学ん で くだ さい 。 

この 3 次元 の 世界 は ,。 まぎれ も な く 私 た ち が 住 ん で いる 世界 な の で す 。 そ れ を コン ピュ ー タ 内 部 で 
忠実 に 表現 し て いる だ け な の で す 。 実在 の 空間 と 同じ 空間 を ュ ン ピュ ー タ 内 部 で 作り 上 げ る 。 実 に 楽 
し いこ と で は あり ませ ん か 。 さあ, いっしょ に 3 次 元 グ ラフ ィ ッ クス の 世界 へ 飛び 込ん で み ま し ょ 5 
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本 書 の 構成 と 使い 方 


本 書 で は , 3 次 元 グ ラフ ィ ッ クス を 大 い に 楽 し ん で いた だ く た め に , 代表 的 な 手法 を 取り 入れ た 
10 本 の プロ グラ ム を 用 意 し まし た 。 し か し , プロ グラ ム を た だ 実行 する だ け で は , 皆さん が 独自 の グ 
ラフ ィ ッ クス を 作り 出す た め の 発 展 は 望め ませ ん 。 そ こ で , 若干 の 炉 わ し さ を 感じ られ る か も し れ ま 
せん が , 3 次 元 空間 で 図形 を 表現 する う え で 欠か せな い , いく つか の 基礎 知識 や 基本 の テク ニッ ク を , 
負担 に な ら な い 程 度 に や さ し く 解説 し て いま す 。 さらに, 2 次 元 で の 画像 処理 を 学ん だ うえ で 3 次 元 
処理 の さま ざま な テク ニッ ク を マス ター する と いっ た よう に , 章 を 追っ て , 段階 的 ・ 系 統 的 に つなが 
り を 持た せ た 解 説 を 試み て いま す 。 ぜ ひ , 初め か ら 順 に ,。 じっくり 取り 組ん で みて くだ さい 。 

以下 に , 本 書 の 各 章 の 内 容 を 紹介 し て お きま す 。 

第 1 章 3 次 元 グ ラフ ィ ッ クス の 基礎 

コン ピュ ー タ グラ フィ ックス (CG) は , CAD プ CAM, ビジ ネス , CAL アニ メー ショ ン , デザ 
イン と いう よう に , 種々 の 分 野 で 応用 され て いま す 。 そ れ ぞ れ の 分 野 で 表現 され る 画像 の 形態 (デザ 
イン ) は, 大 きく 異な っ て いま す 。 例えば, CAD/CAM で は , その 製品 の 持つ 形態 の 精密 な 寸法 
が 重要 で あっ た り , また , ビジ ネス の 分 野 で は , 表示 され る グラ フ の 目盛 りや , その 表現 する シン ボ 
ル が 重要 で あっ た り し ます 。 し か し , どう らい っ た 分 野 で あっ て も , コン ピュ ー タ に よっ て そう いっ た 
情報 を 処理 する か ぎり に お いて は , コン ピュ ー タ 内 部 に いか に 効率 よく 絵 を デー タ と し て 記憶 させ る 
か が カギ で あり , また , その デー タ を 基 に し て 種々 の 図形 操作 を 行う こと が 基本 で ある と いえ ます 。 

第 1 章 で は , 3 次 元 グ ラフ ィ ッ クス の 基礎 と し て , 主として コン ピュ ー タ 内 部 に どの よう に 図形 が 
作ら れ て いく の か , ЖҰ, 作ら れ た 図形 が どの よう に 変換 され て いる の か な ど に つい て , 基礎 か ら 解 
説 を 行い ます 。 解説 を わか りや すく する た め に , 便利 な 行列 式 に よっ て 解説 し ま し た 。 行列 は , 現在 
の 教育 で は , 高校 の 数 学 で 学ぶ も の で す が , わか っ て し まう と 便利 な も の で す 。 学 ん で いな しい 方 , Ж 
れ て し まっ た 方 に は , 「 付 録 3 マト リッ クス 演算 の 基礎 知識 」 で 簡単 に 行列 式 の 使い 方 に つい て 解 
説 し て いま す 。 そ ちら も 参考 に し な が ら , この 章 を よく 理解 し て くだ さい 。 理屈 な ど は どう で も いい 
か ら , と に か く 描 きた いと いう 方 は , この 章 を と ば し て いた だ いて も けっ こう で す 。 


第 2 章 2 次 元 画像 処理 技術 入門 


前 著 「 パ ソ ュ ン ・ グ ラフ ィ ッ クス の 作り 方 楽し み 方 」 の 中 で 紹介 し た 「 デ ザイ ン ッ ツー ル 」 を さら に 
バー ジョ ン ア ッ プ し た アプ リケーション ・ ソ フト を 紹介 し て いま す 。 こ の ツー ル を 自在 に 活用 する こ 
と に よっ て , ディ スプ レイ 画面 に さま ざま な 図形 や 絵 を 描く こと が で きま す 。 あ な た の セン ス を 十分 
に 発揮 し て , 独創 的 な 2 次 元 グ ラフ ィ ッ クス を 作り 出し て くだ さい 。 ここ で 描い た 絵柄 は , 画像 デー 
タ を セー ブ し て お く こ と に よっ て , 第 4 章 で 紹介 する マッ ピン グ の 原画 と し て 利用 する こと が で きま 
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本 書 の 構成 と 使い 方 


す 。 な お , 以下 に 紹介 する プロ グラ ム に つい て も 同様 で す が , プロ グラ ム の 組み 立て を 理解 し や すく 
する た め , 変数 表 お よび 流れ 図 を 紹介 し て いま す 。 


第 3 章 3 次 元 図形 処理 技術 入門 


この 章 で は , 本 格 的 な 3 次 元 図形 を 表現 する た め の デ ザイ ン ツ ー ル ・ プ ログ ラム を 紹介 し て いま す 。 
第 1 章 で も , 形状 モデ リン グ の さま ざま な 種類 を 紹介 し て いま す が , ここ と では, ワイ ヤー フレ ー ム ・ 
モデ ル ま た は サー フェ イス ・ モ デル の デー タ 構 造 を と っ て いま す 。 実際 に 演算 処理 を 行う 場合 に は , 
第 1 章 で 解説 し た 座標 変換 や 透視 変換 の 技術 を 核 と し て プロ グラ ミン グ す る 必要 が あり ます 。 こ こと で 
紹介 し て いる プロ グラ ム に は , そう いっ た テク ニッ ク を 実際 に 盛り 込ん で ソフ トウ ェ ア が 構成 され て 
いま す 。 3 次 元 の 世界 を 理解 する うえ で , ЖО 第 1 章 と 照ら し 合わ せ て 読ま れる こと を お すす めし 
ます 。 3 次 元 空間 に 表 さ れる 物体 の 姿 を 楽し ん で くだ さい 。 


第 4 章 マッ ピン グ 処 理 技術 


マッ ピン グ 技 術 は , CG の 高等 テク ニッ ク の 1 つと し て 注目 すべ きも の で す 。 

物体 の 表面 の テク スチ ャ を 表す 場合 , 表面 パタ ー ン の 微細 な 形状 を , いち いち 形状 レベ ル の パッ チ 
で 定義 むす る の が 実際 的 で は な いこ と は , だ れ が 考え て も 明らか な こと で す 。 こ の た め , 表面 パターン 
は , 2 次 元 の 画像 処理 技術 で 描き , 物体 形状 は , 3 次 元 そ モデ ル で 描く と いっ た よう に 分 け て モデ ル 化 
L, 3 次元 形状 モデ ル に 2 次 元 パ ター ン を マッ ピン グ す る と いっ た 手法 を と り ま す 。 

この 方 法 は , 一 般 に Texture mapping (テク スチ ャ ・ マ ッ ピ ング ) と 呼ば れ , 2 次元 パタ ー ン を 
3 次 元 そ デ ル に は りつ ける 技術 と し て 重要 な も の と いえ ます 。 

жани, マッ ピン グ 処 理 技術 と し て , 第 2 章 で 描か れ た 2 次 元 画像 処理 図形 を , 3 次 元 で 表現 さ 
れる プリ ミ テ ィ ブ へ は りつ ける 技術 (テク スチ ャ ・ マ ッ ピ ング ) に つい て , アプ リケーション ・ ソ フ 
トウ ェ ア と と も に 解説 し , 紹介 し ます 。 気長 に 一 つ ー つ の グラ フィ ックス の 仕上 が か り の プロ セス を 楽 
し ん で くだ さい 。 
第 5 章 図形 処理 技術 の 応用 

第 5 章 は , 画像 処理 技術 の 応用 と し て , レイ トレ ー シ ン グ ОБ В), ステ レオ ・ グ ラフ ィ ッ ク 
A, ステ レオ ・ フ ラク タル の 各 プ ログ ラム を 紹介 し ます 。 い ずれ も , 最近 の コン ピュ ー タ ・ グ ラフ ィ 
ックス ・ ブ ー ム の 中 で , 最も 高度 で 難し い テ クニ ッ ク ば か り で す 。 容易 に わか りや すい よう に 解説 し 
て あり ます が , より 理解 で きる よう に , 実際 に 動か し て みて くだ さい 。 ス テレ オ ・ グ ラフ ィ ッ クス に 
関し て は , ステ レオ めがね を か け て 鑑賞 し て くだ さい 。 立体 像 が 浮か び 上 が り ま す 。 


本 書 で 使用 する パソ コン と BAGgIO 


X 1 シリ ー ズ に は , X 1D 系 , X 1F 系 そし て X 1 ターボ に は model 10, 20, 30, 40 に 続い て ター 
ボ II と 続々 と 機種 が か そろ っ て きま し た 。 本書 で 採用 し た プロ グラ ム は , それ ら の すべ て の 機種 と 
BASIC に 対応 で きる よう に 組ん で あり ます 。 た だ 機種 に より 若 干 の 相違 が あり ます の で , アプ リ ケ 
ーション ・ プ ログ ラム に は , それ ぞ れ どの 箇所 を どの よう に 変更 すれ ば いい の か を 解説 し て あり ます 。 
それ に 従っ て 変更 し て ご 使用 くだ さい 。 


@X 1 ターボ の 場合 


X 1 ター ボ の DISK: BASIC (CZ-8FB 02) 35: U CASSETTE BASIC (CZ-8 CB 01) ご 利用 
の 読者 は , この まま 打ち 込ん で ご 使用 くだ さい 。 

た だ し , model 10 ご 利用 の 読者 は , 別売 グラ フィ ッ ク RAM (CZ-8 BGR 2) を 使用 する と , BR 
像 度 画面 (640X400 ド ッ ト ) と し て 使用 で きま す が , 標準 機 た に は 実装 され て いま せん の で , KR 
度 画面 (640X200 ド ッ ト ) の まま で 使用 する こと に な り ま す の で ご 注意 くだ さい 。 そ の 場合 は , Іші 
面 表示 の 命令 , つま り WIDTH 命令 は 1 ター ボ 用 , 座標 系 は X 1 シリ ー ズ 用 と し て 打ち 込ん で く 
だ さい 。 

また , BASIC 起動 時 に , [HELP | キー を 押し て NEW ON[CR| で ご 使用 くだ さい 。 


@ X 1 1 シリ ー ズ の 場合 


X 1 シリ ー ズ の DISK BASIC (CZ-8FB 01) お よび CASSETTE BASIC (CZ-8 CB 01) “ЖІ 
用 の 読者 は , 各 プ ログ ラム に 指示 され た REM 文 , また は 変更 点 に 従っ て 打ち 直し て くだ さい 。 

た だ メモ リー 容量 の 関係 で X 1 ター ボ シ リ ー ズ より 若干 機能 を 低く お さえ て ある 場合 も あり ます 
DT, ご 了承 くだ さい 。 


@X1F の 場合 


X 1 シリ ー ズ の NEW BASIC (CZ-8FB01V.2.0, CZ-8 CB 01 V. 2.0) ご 利用 の 読者 は , X1 
シリ ー ズ と 同様 に プロ グラ ム を 変更 し て か ら 入 力 し て くだ さい 。 ま た , BASIC 起動 時 に , NEW 
ON[CR| で 使用 し て くだ さい 。 


すべ て の プロ グラ ム は , 以上 の 変更 内 容 で 使用 可能 で す が , X12 - EH BASIC NEW 


BASIC に は , NEWON 命令 で 使用 で きる メモ リー 空間 と 使用 命令 の 設定 が 可能 と な っ て いま す 。 
詳細 は それ ぞ れ の BASIC マニ ュ ア ル を 参照 し て くだ さい 。 
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3 次 元 グ ラフ ィ ッ クス の 基礎 


ee 


コン ックス の 表現 技術 


ピュ ー タ クラ フィ 


ュ ン ピュ ー タ に 図形 を 記述 する 方 式 と し て , 大 きく 2 通り の 処理 技術 が あり ます 。 

lou, 写真 や 絵 を その まま 2 次 元 の デー タ と し て メモ リー に 取り 込ん で 処理 する も る ので, 画像 処 
理 技術 と 呼ば れ て いる も の で す 。 これ は , 地球 の 気象 状況 や 樹木 の 分 布 等 , 自然 の 実態 を 調査 ・ 解 析 
する た め の リ モー ト セ ン シ ン グ 技 術 や , 脳 の 断面 図 や 物体 の 材質 処理 と いっ た , 主として 形状 その も 
の が 意味 を 持つ (X, Y, Z の 情報 を 必要 と し て いな い ) も の で , 写真 の よう な ラス ター 情報 その も の 
を 処理 する 技術 と いえ ます 。 

2 つ 目 の 技術 は , 基本 的 に 世の中 の 物体 その も の の 持っ て いる 大 き さ 等 を 記述 する た め に ,。 3 次元 
の デー タ と し て 取り 込ん で 処理 する も る ので, 図形 処理 技術 と 呼ば れん て いる も の で す 。 これ は , デー タ 
構造 その も の が , X, Y, 2 と いっ た 座標 デー タ を 持っ て お り , これ ら を 処理 する こと と に よっ て あら ゆ 
る 形状 表現 を 行う も る ので, デー タ 構 造 の いか ん に よっ て , 画像 その も の の 記述 だ け で は な く , 加工 処 
理 装置 等 を 組み 合わ せ て МС (数值 制御 ) 加工 を する と いっ た こと が 可能 に な り ま す 。 

2 つの 方 式 は , 相 通 し る る の が ある わけ で す が , 現在 の と ころ , 別々 の 研究 分 野 で 利用 され て お り , 
両者 の 統合 化 が 今後 の 大 き な 課 題 で ある と いえ ます 。 


画像 処理 技術 


写真 の よう に , 画像 その も の が 意味 を 持つ も の 
で , カメ ラ や スキ ャ ナー な ど を 使っ て ピク セル 
の ドッ ト 情 報 を メモ リー に 取り 込み . それ ら を 
処理 する こと に よっ て 表現 する 技術 。 


応用 ・ リ モー ト セ ン シ ン グ 


図形 処理 技術 


X, Y, Z の 座標 デー タ を 基本 的 に 持ち , その 
デー タ 構 造 の と り 方 に に よって, ワイ ヤー フレ ー 
ム , サー フェ イス , ソリ ッ ド な どの モデ リン グ 
が 可能 な 技術 。 


応用 ・CAD/CAM, CAE, 
コン ピュ ー タ アニ メー ショ ン 


anm 


7525 


る @ リ モー ト セ ン シ ン グ の 応用 例 一 一 日 本 近海 の 温度 分 
布 (漁業 情報 サー ビス セン ター) 


⑯CAD ノ CAM の 応用 例 一 一 電車 の 組立 概念 図 (シャ ー プ ) 


1 一 | コン ピュ ー タ ・ グ ラフ ィ ッ クス 表現 技術 の 分 類 
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SS SC S 22-7: Е ТЕЕ Mu c qu p 
II | | | 2. . 2... 
XT ence rm ・ MON = ë s —— 


通常 , 写真 と か 絵画 と いっ た 画像 を 私 た ちの 目 に 送り つけ る 絵柄 (カラ ー) に は , X, Y の 座標 値 
は な く , 1 枚 の 原稿 (あえ て こう 呼ぶ ) 上 に 画像 情報 ( 色 や 形状 な ど ) を 蓄積 し て 表示 し て いま す 。 
この 場合 の 原稿 は , 絵柄 の 情報 を , 三原 色 お の お の の 連続 的 な 濃度 変化 の 組み 合わ ちせ と いう 形 で 記憶 
し て いる メモ リー (記憶 装置 ) と 考え られ ます 。 人間 の 目 は , この 原稿 に 光 を 当て て , 著 積 され た 情 
報 を 読み 取っ て いま す 。 

で は , これ を コン ピュ ー タ で 処理 する に は どう し た らい い の で し ょ 5% 

通常 , コン ピュ ー タ が 扱え る 情報 の 形式 は 。 ビッ ト と 呼ば れる 2 進数 を 組み 合わ せ た 電 気 信号 で 成 
り 立 っ て いま す 。 こ れ に 先ほど の 画像 情報 を 覚え こま せる に は , ビッ ト 形 式 に 画像 デー タ を 変換 し な 
く て は な り ま せん 。 これ は 電気 的 に 行う わけ で す が , 絵柄 等 の 情報 を 2 進数 の 電気 信号 に 置き 換え る 
作業 を , 「 デ ジタル 化 」 と 呼ん を で いま す 。 | 

通常 , 絵柄 を デジ タル 化す る に は , 「 ス キャ ナー」 を 使用 し ます 。 こ れ は , 複写 機 の よう な も の と 
考え て いた だ けれ ば よく , あら か じ め 用 意 さ れ た 絵柄 な どの 原稿 も, スキ ャ ナー の 原稿 台 に 載せ , Ж 
の スポ ッ ト を その 原稿 上 に 当て て 走査 させ , 1 点 1 点 の デー タ を デジ タル 化し て いき ます 。 カ ラー 原 
稿 の 場合 は , R (9 G ОВ ( 青 ) の 光 の 三原 色 に 分 割 し て , フィ ルター を 通し て , それ ぞ れ の 
色 に 対応 し た 光 の 量 を 受け て 電気 信号 に 変え て いき ます 。 

光 を 走査 する 場合 の スポ ッ ト の 精度 は , 絵柄 等 の 原稿 を デジ タル 化す る と き の 解 像 度 に 影響 し ます 。 


絵柄 の 原稿 コン ピュ ー タ ディ スプ レイ 
スキ ャ ン ラ イン 


Бала 4 
SEM 
ceux № 


図 ! 一 2 画像 処理 の 基本 的 な 工程 


よく ミリ 8 本 と か , ミリ 12 本 と か いわ れ て いる の は , こう いっ た スポ ッ ト の 精度 を 指し て いっ て い 
る わけ で す 。 こ うい っ た スポ ッ ト の 精度 は , ちょ うど 原稿 を 精度 の 単位 で ある 細か い 方 眼 紙 に 分 けた 
も の と 同様 と いえ ます 。 通常 この 方 眼 紙 の 1 つの マス 目 を 1 ピク セル と 呼ん で いま す 。 

私 た ちか が 今 使 お うと し て いる パソ ュ ン は , 高 解 像 度 画面 で 640X400 ド ッ ト テ 256000 ド ッ ト , つま 
り 256000 ビ ピクセル の 画面 表示 能力 か あり ます 。 例 えば , 32 cmx20 cm の 原稿 を 用 意 し て いる 場合 , 
画面 全体 に 表示 する に は , š 9 2 本 の 精度 で いい わけ で す 。 通常 は に こういう 荒い も の で は な く , ミリ 
20 本 くら い の も の が 産業 用 と し て 使用 され て いま す 。 

デジ タル 化 さ れ た 情報 は , 基本 的 に は , 1 ピク セル ご ど と の 色情 報 と し て 記憶 され ます 。 記 憶 媒 体 と 
し て は , ディ スプ レイ 画面 の ほか, フロ ッ ピ ー デ ィ ス ク , デー タレ ュー ダ 用 カセ ッ ト テ ー プ 等 が 考え 
られ ます 。 本書 の プロ グラム は , X1 タ ー ボ /X1 シリ ー ズ と も , ディ スプ レイ 画面 を 複数 枚 持っ て 
いる た め , それ ら を 使用 し て 計算 する ほう が 効率 が いい と いう 考え 方 か ら , 記憶 媒体 と し て 使用 し ま 
T (も ちろ ん 処理 後 の 画像 デー タ は , フロ ッ ピ ー デ ィ ス ク お よび カセ ッ ト テ ー プ に も 記憶 する こと が 
で きま す )。 
通常 分 割 さ れ た 微小 な 画素 (ビク セル ) は , 1 つ 1 つ が 三原 色 の 輝度 を 持っ て いま す 。 多 色 の 出る 
専門 家用 の ディ スプ レイ で は , R, G, B それ ぞ れ に 8 ビッ ト , つま り 256 段 階 の スモ リー を 備え て い 
ます (ルッ クア ッ プ テー ブル と いう )。 し か し , 本 書 で 扱う マイ ュ ン の 場合 は 。 R, G, B それ ぞ れ に 
1 ビッ ト し か 持っ て いな いた め , 8 色 し か 表示 で きま せん 。 そ の た め , 色情 報 を 256 階 調 持 つた め に 。 
ディ ザ 法 を 用 いま す 。 こ れ に は , 組織 的 ディ ザ 法 と ラン ダム ディ ザ 法 の 2 種 が か あり ます 。 こ の こと に 
関し て は , 第 5 章 の レイ トレ ー シ ン グ (152 ペ ー ジ ) で 詳し く 解 説 し て いま す 。 


ディ スプ レイ 画面 に デジ タル 化 さ れ た 画像 
映 さ れ た 画像 (画像 デー タ の 集合 ) 


処理 後 
画像 処理 | 一 と rasoir 


パー ツナ ルコ ンピュータ カセ ッ ト テ ー プ 
フロ ッッ ピー ディ スク 


2 ここ に は 合成 され 
d た 色 が 見 える 


濃度 に つい て の 信号 


ディ スプ レイ 


図 ! 一 4 三原 色 の 濃度 と 合成 され る 色 


第 1 章 3 次 元 グ ラフ ィ ッ クス の 基礎 


| 図形 処理 技術 の 基礎 
— === . — — — | 


世の中 の すべ て の 物体 は , その 物体 の 持っ て いる 大 き さ や 色 と い っ た も の で 表す た め に , X, Y, Z 
と いう 座標 値 を 設定 する こと が で きま す 。 これら の 値 を 用 いて 形状 を 記述 する に は , これ ら の 座標 値 
を 設定 する た め の 仕組 み を 学ぶ 必要 が あり ます 。 こ の 仕組 み を 学ぶ と と に より , コン ピュ ー タ 内 部 へ 
の 図形 の 記述 様式 を 理解 する こと が で きま す 。 

通常 3 次 元 (立体 ) の 物体 , 例え ば 電気 器具 の テレ ビ の 外形 形状 は 。 大 きく 分 ける と , 絵 を 表示 す 
る た め の プ ブラ ウン 管 , それ を 囲む ズル まわ り , ボディ , チャ ン ネ ル 操 作 部 な ど に 分 か れ ま す 。 チャ 
ン ネ ル の スイ ッ チ は , 同一 形状 の も の が 複数 個 並 ん で いる し , ボディ の 形状 , 操作 キー の 形状 は 長 方 
形 の 形 を し て いる と いえ ます 。 ま た , ボディ , チャ ン ネ ル 操 作 部 に 注目 する と , さら に 小さ な 形状 の 
要素 (エレ メン ト ) に 分 か れる の が 容易 に 想像 で きま す 。 こ うし て みる と 一 般 的 に は , すべ て の 物体 
は 複数 の エレ メン ト か ら 成 り , また , 階層 構造 を し て いる の が わか り ま す 。 

ここ で これ ら の 関係 を 整理 し て みる と , ある 階層 の お の お の の エレ メン ト は , それ が 属す る 上 位 の 
エレ メン ト に た 対し, ある 変換 に よっ て 関係 づけ られ ます 。 ま た , この 変換 の 形式 は , 最上 位 に 全体 の 
座標 系 が 存在 し , 階層 構造 を 成す 部 分 的 な 座標 系 群 に よっ て 構成 され る こと が わか り ま す 。 こ れ ら の 
こと か ら , コン ピュ ー タ 内 部 に 物体 を 形成 する た め に は , 種々 の 変換 が 必要 な こと が わか り ま す 。 

コン ピュ ー タ 内 部 に デー タ を 形成 する 場合 は , 通常 , 図 1 一 5 で も わか る よう に , 入力 装置 か ら , 


概念 内 の 画像 画面 上 の 画像 


ワー ルド 座標 系 スク リー ン 座 標 系 
変換 式 
— 
座標 変換 
透視 変換 
Z= L За 


ディ スプ レイ 
ファ イル の 
発生 ・ 変 更 


1—5 グラ フィ ックス ・ シ ステ ム の ソフ トウ ェ ア 関 係 図 


その 入力 デバ イス の 座標 系 か ら , ある 変換 式 を か け て ワー ルド 座標 系 に 書き 込ん だ 後 , それ を 見 せる 
た め の 出 力 装 置 で ある ディ スプ レイ 装置 の 特定 な 座標 系 (スク リー ン 座 標 系 ) に 変換 させ て 出力 し ま 
Ju 

ここ で 変換 の た め の テ クニ ッ ク が 必要 と な る わけ で す が , 大 きく ワー ルド 座標 系 に 描か れ た 図形 を , 
移動 , 回 転 , 拡大 , 縮小 等 を 行う た め の 座 標 変換 , 透視 図 的 に 見 せる 透視 変換 物体 を 立体 的 に 見 せ 
る ステ レオ グラ フィ ックス 変換 (基本 的 に は 座標 変換 , 透視 変換 の 組み 合わ せ ) 等 の テク ニッ ク か 必 
要 に な り ま す 。 そ れ ぞ れ に つい て 解説 し ます 。 


| 形状 モデ リン グ の 種類 Í 


図形 処理 技術 の 骨格 を 成す 形状 モデ リン グ の 表現 技術 に は , 現在 使わ れ て いる モデ ル と し て 3 つの 
種類 が あり ます 。 
① ワ イヤ ー フ レー ム ・ モ デル 
(サー フェ イス ・ モ デル 
⑬③ ソ リッド ・ モ デル 
それ ぞ れ 次 の よう な 特徴 が あり ます 。 


コン ピュ ー タ に 図形 を 記述 させ よう と し た 場合 

|__ ワ ィ ヤ ー フ レー ム ・ モ テル 生計 

ー タ や プロ グラ ム に 不備 な 点 が あれ ば , 無用 の 長物 と な っ て し まい ます 。 コ ンピュータ 内 に 形状 を 表 

現す る 要素 中 で いち ば ん シン プル な も の に 点 が あり ます 。 し か し , こと の 点 だ け で は , 形 を 表現 する こ 

と は 不可 能 に 近い こと と な り ま す 。 点 を た くさ ん 並べ て , つま り 線 に し て 初め て 形状 が 記述 で きる こ 
と に な り ま す 。 線 さえ あれ ば どん な 形状 も , 一 応 記述 する こと は 簡単 に な り ま す 。 

ワイ ヤー フレ ー ム ・ モ デル と は , 読ん で 字 の ご と く , まさ に ワイ ヤー GR) の フレ ー ム (Е) で 


図 !| 一 6 ワイ ヤー フレ ー ム ・ モ デル の デー タ 構 造 
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描か れる デー タ 構 造 を 持つ 形状 モデ リン グ を 指し て いま す 。 つ まり , コン ピュ ー タ 内 部 の デー タ 構 造 
と し て は , 点 と それ ら を 結ぶ 線 の み で 記述 する も の を 指し て いま す 。 そ の た め , 非常 に シン プル な デ 
ー タ 構造 で メモ リー も 少な く て すみ ます が , 円 柱 や 円 雛 な どの 千 線 以外 に 輸 郭 線 が な いと 表現 し に く 
い 形 状 に 関し て は , ワイ ヤー フレ ー ム で 記述 を 行う こと は 難し く な り ま す 。 

Жо, ワイ ヤー フレ ー ム は 線 の み の 形 状 で あり , 面 情報 以上 の デー タ を 持っ て いな いこ と か ら , m 
構成 の 範囲 と か , БІНЕ, 断面 図表 示 , 体積 計算 等 と いっ た こと と が で き な い 反面 , デー タ 構 造 の 単 
純 さ か ら 計 算 の スピ ー ド 化 や 記憶 容量 の 簡易 さと いっ た 長所 も 見 受け られ ます 。 

サー フェ イス ・ モ デル は , ワイ ヤー フレ ー ム ・ 
| サーフェイス: モテ ニル ОНИ 
す 。 面 デー タ を 追加 する こと か ら , ワイ ヤー フレ ー ム ・ モ デル で 不可 能 と され て いた 隠 線 消去 や , 断 
面 図表 示 , НЕТ, 表面 積 計算 と いっ た 計算 が 可能 と な り ま す 。 ま た , コン ピュ ー タ ・ グ ラフ ィ 
ックス (CG) に と っ て 非常 に 大 切な 3 次 元 そ モデ ル の リア ル な 画像 表示 で ある レイ トレ ー シ ン グ や 2 
次 元 画像 の 3 次 元 図形 の 面 上 へ の マッ ピン グ な と が 可能 に な っ て きま す 。 

し か し 面 デ ー タ は 持っ て いる も の の , 面 と 面 と の 間 に は 構造 上 の 関係 値 を 持っ て いな いた め に , 例 
えば, 物体 が 面 の どちら 側 に 属し て いる か と いっ た よう な こと は 計算 不可 能 で す 。 ま た , サー フェ イ 
х (表面 ) の デー タ 構 造 し か 持っ て いな いた め , 物体 内 部 の 計算 で ある 重量 や 重心 と いっ た マス ・ プ 
ロ パ ティ の 計算 は 不可 能 で す 。 し か し , その 持っ て いる 簡易 さ は すばらし いも の が あり , 現在 開発 , 
実用 化 さ れ て いる CAD/CAM シス テム の ほとん ど が , サー フェ イス ・ モ デル の デー タ 構 造 に より 記 


述 さ れ て いま す 。 
ソリ ッ ド ・ モ デル は ,。 中 身 の 詰まっ た ソリ ッ ド 
ә)! с е т 
| ノリ ッ ド ・ モ デル | な (固形 の ) 立体 を 表現 する モデ ル を 指し て いい 
ます 。 こ の モデ ル は , 現在 は 基本 的 に 研究 途上 の 表現 技術 で , その 表現 方 法 に は 大 きく 3 つの 方 法 が 


1-7 サー フェ イス ・ モ デル の デー タ 構 造 
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あり ます 。 

①B-reps 表現 (Boundary representation) 
CSG 表現 (Constructive Solid Geometry) 
(3 V oxel 表現 

1 つ 目 の B-reps 表現 と は , 基本 的 に は サー フェ イス ・ モ デル の 延長 線上 に 位置 する も の で , Bo 
どちら 側 に 物体 が 存在 し て いる の か を 表現 する た め に , ある 面 を 物体 の 外側 か ら 見 て , その 面 を 構成 
する 千 線 を 左 回 り に 並べ る こと に より , 面 の 方 向 が 物体 の 外側 に 向い て いる と 定義 し , 面 の 外側 と 内 
側 の 判定 を し て いる も の で す 。 こ れ に より , 物体 の 中 身 の 情 報 , つま り 立 体 情報 を 2 持つ こと に な り , 
重心 や 断面 形状 と いっ た マス ・ プ ロペ ティ の 計算 が 容易 と な り ま す 。 

3 次 元 物体 を 表現 する 場合 , 基本 的 に は , 物体 と それ を 囲む 面 , 面 と それ を 囲む 先 線 , Lth 
を 形成 する 2 個 の 頂点 と いう よう に , 「 立 体 一 面 一 千 線 一 頂点 】」 と いう ツリー 構造 〈 木 构造 ) で 記述 
し ます 。 そ の 立体 デー タ を , ある 面 を 物体 の 外側 か ら 見 て , その 面 を 構成 する 千 線 を 左 回 り に 並べ る 
こと に より , 面 の 方 向 が 物体 の 外側 を 向い て いる と 定義 むれ ば , 面 の 外側 と 内 側 の 判別 が 可能 と な り , 
ソリ ッ ド ・ モ デル の デー タ 構 造 と な り ま す 。 図 1 一 7 の サナ サー フェ イス ・ モ デル の 面 デ ー タ を B-reps 表 
現に よっ て 並べ 換え た も の が 図 1 一 8 で す 。 

この よう に , 3 次元 物 体 の 形状 を その 境界 面 で 表現 する 方 法 を 境界 表現 (Boundary representa- 
tion) と 呼び ワイ ヤー フレ ー ム ・ モ デル , サー フェ イス ・ モ デル の 延長 線上 に ある テク ニッ ク と し 
て , ほとん どの CAD/CAM シス テム が 採用 を 図っ て いま す 。 

図 1 一 9 の よう に , 3 次元 物体 の 1 つの 千 線 を は さん で 左右 に 2 個 の 面 が あり , その 形 が 鳥 が 翼 を 
広げ た よう な 形状 を し て いる 点 か ら , ウィ ング ド ・ エ ッ ジ と 呼ば れ て いま す 。 と の 方 式 は , サー フェ 
イス ・ モ デル と 共通 の 考え 方 が で きる と いう ほか は , 直方 体 の よう な 簡単 な も の と は いか ず , 入力 が 
困難 な ほか , デー タ 構 造 も 複雑 で , か つ 大 容量 の メモ リー を 要する と いう 欠点 を 持っ て いま す 。 


図 ! 一 8 B-reps 表 現に よる ソリ ッ ド ・ モ デル の デー タ 構 造 
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2 っ つ 目 の CSG 表現 (Constructive Solid E6470 
Geometry) と は , 形状 記述 を 従来 の よう に , 頂点 の 終わ り 
「 頂 点 つ 生 線 ~ 面 一 立体 ]」 に 置き 換え て いく の 
で は な く , 初等 幾何 学 で 表現 し ます 。 球体 や 円 
筒 , 円 雛 と いっ た プリ ミ テ ィ ブ (基本 形状 ) に i 

頂点 の 始ま り 
置き 換え て , それ ら を 集合 演算 する 組み 合わ せ жото ові 
に よっ て 形状 記述 する 方 法 で す 。 1 一 9 ウィ ング ド ・ エ ッ ジ の デー タ 構 千 

定義 し た 過程 その まま の 状態 で デー タ 構 造 に 記憶 し て いる た め に , デー タ 構 造 そ の も の が ュ ユン パク 
ト で あり , デー タ の 作成 方 法 , 修正 等 も 容易 で す 。 し か し , 従来 型 の 設計 手法 で は 形状 記述 が で き に 
くい こと や , 図面 の 作成 や 展開 図 の 作成 , 表面 積 計算 が 困難 と いっ た 欠点 が あり ます 。 


01—10 プリ ミ テ ィ ブ の 例 (北大 TIPS-1 に よる ) 
最後 の Voxel 表現 と は , 
3 次 元 空間 を 小さ な 単位 立 
方 体 に 分 割 し , 物体 が この 
単位 立方 体 を 占め る か どう 
か に よっ て 0, 1 の 情報 で i TIL 
表現 する 方 法 で す 。 3 つの i 

方 法 の うち , 最も シン プル 
な 構造 と いえ ます 。 し か し , 
実際 に 実用 化し うる 精度 を 
得る た め に 単位 立方 体 に 分 
割 す る に は , 相当 量 の デー 
タ が 必要 と な る の で , ソフ 
トウ ェ ア で 処理 する に は , 
膨大 な 時 間 を 要する こと と 
な り ま す 。 І-ІІ Voxel 表 現 の 例 


— 
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コン ピュ ー タ ・ グ ラフ ィ ッ クス の 重要 な 基礎 技術 の 1 つ に 座標 変換 技術 が あり ます 。 

説明 を わか りや すく する た め に , まず 3 次 元 座標 変換 の 基礎 と な る 2 次 元 の 変換 技術 に つい て 話 を 
進め ます 。 次 いで それ ら の ベー ス に 立っ て , 3 次 元 の 変換 技術 の 解説 を し ます 。 な お , 変換 技術 を 解 
説 す る た め に 必要 な 数 学 的 知識 は , 変換 式 を 示し て な る べく 詳細 に 解説 し て いま す の で , お わか り い 
た だ ける と 思い ます 。 ま た ., 座標 変換 に 関係 し て いる マト リッ クス 演算 を 取り 上 げ て いま す が , わか 
ら な い 読 者 は , 「 付 録 2 マト リッ クス 演算 の 基礎 知識 」(178 ペー ジ ) を 参考 に し て くだ さい 。 


— === jD — — 


座標 変換 で 最も 基本 的 な 変換 に は , 次 の 3 つが あり ます 。 
(А) 移動 (Movement) 
(B 拡大 ・ 縮 小 Scaling) 
(C mz (Rotation) 


| #5 (Movement) 


の 関係 式 に 表す こと が で きま す 。 
к D 
YHP 
これ を あら た め て マト リッ クス 演算 の た め の 行 列 式 で 書き 直す と , 次 の よう に 書き 表す こと が で き 
ます 。 


| 座標 軸 Ж, Ж 上 の 1 点 Рх, у) が , PX. у) 
に 移動 する 場合 に は , 移動 量 を な , あぁ と する と 次 


1 一 12 点 P の 移動 
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J 1 
[^ у]=[х jl | @ 


tx ty 
これ は , ベク トル 加算 の 形式 で 書き 表し て いま す が , 通常 , 図形 変換 の 場合 は , 1 回 の 変換 式 で 完 
了 し て し まう と いう こと と は な く , いろ いろ な 複数 の 変換 式 を 組み 合わ せ て 利用 する こと が あり ます 。 
その た め に , すべ て の 変換 処理 を 同一 の も ゃ の と し て お く 必 要 が あり ます 。 そこで, 同時 座標 系 
(Homogeneous coordinate system) の 概念 を 導入 する 必要 が あり ます 。 
同時 座標 系 で は , 座標 を 表す 次 元 を 1 つ 増やし て , ② 式 を 変更 し て 次 の よう に 書き 表す こと が で き 
ж, 


0 
0 Бі 1) 1. 
1 


: 原点 (0, 0) を 中 心 と し て 拡大 ・ 縮 小 する 場 
| 涼 大 * 縮 小 (Scalin5)) |НИККРЕТЕЛЕРИМИНЕН 
S, 倍 さ れ ま す 。 拡 大 ・ 縮 小 後 の そ れ ぞ れ の 座標 を (*, у) と する と , 次 の よう に 表す こと が で きま 
rr 

ан би 


@ 
у= Sy • у 


(た だ し , >1, 55>1 の と き は 拡大 , 0«S,«1, 0<5,<1 б 0 Jti 
通常 の 場合 は , S,—S, と な り , 5,+ 5, の 場合 は 図形 自体 が 変形 し , 拡大 ・ 縮 小 と は 異な り ま す 。 
これ を 行列 式 で 書き 直す と , 次 の よう に な り ま す 。 
P lS EE 
k “І-Ш 4 я Sd @ 
同時 座標 系 で あら た め て 書き 換え る と , 次 の よう に な り ま す 。 


5, · 


ニー デーー テー 


1—13 点 P の 拡大 縮小 
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S> 0 0 
[rr у l[x у | 0 S, 0 (6) 
0 0 1 


て 原点 を 中 心 と し て 時 計 ま わり に 角度 の だ け 回 
座標 を (*, у) と する と , 極座標 形式 を 利用 し て それ ぞ れ 次 の よう に な り ま す 。 


X=Y COS w ) 


@ 


y-rsin« 


х= у cos(a — 0) = (cos z cos 0+sin a sin 0) 
у= у sin(a— 8) =7(5іп а cos 0—cos a sin の) | 
(0, ⑧ 式 より , 次 の よう に な り ま す 。 
x'— x cos 0-- y sin の | 


y'——x sin 04- y cos の 
これ を 行列 式 で 書き 表す と , 次 の よう に な り ま す 。 
ЖЧ cosÜ -віп0 
H^ adus ‚| sin の cos の | @ 
同時 座標 系 で 書き 表す と , 次 の 式 が 得 ら れ ま す 。 
cos の 一 sin の 0 
l^ y eie s il ue бб D Ái 
0 0 1 
また , EES (Re Ry) を 中 心 と し た 回 転 (時 計 方 向 に 角度 の ) は , 初期 座標 を (x, y), 回 転 後 の 
Е (х,у) と する と , ③ 式 と ⑪① 式 を 組み 合わ せ て , まず 回 転 の 中 心 (Re Ry) を 原点 に 移動 し 回 
転 を 行っ た 後に 元 の 位置 に 移動 すれ ば よい わけ で す 。 そ こ で まず , ③ 式 に お いて 移動 量 が 


加 1 一 14 点 P の 回 転 
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Ty— — R, 
Ту=— К, 
と な り , 移動 後 の 座標 を Oa, n) と する と , 次 の 式 に な り ま す 。 
1 0 0 
[т y 1] 0 1 0 | =< n 1]— ⑫ 
= Ка =R; 1 


次 に , 角度 の だ け 回 転 し た 座標 を (%, 5) と する と , 次 の よう に 書き 表せ ます 。 


cos の 一 sin の 0 


(ал ll] sinó  cosó 0 | =[% ge 1] @ 
0 0 1 
この 状態 で は , 回 転 の 中 心 点 (Re Ry) が 原点 に 移動 し て いる の で , (х,у) を 求め る た め に も と 
に 戻す に は , ⑱ 式 の 逆 マ トリ ックス を と れ ば よい の で , 次 の よう に 表現 で きま す 。 
1 0 0 
zz ys 0 10| =[z: s 1] @ 
Кы В, 1 


DODAL 0, 次 の 式 が 得 ら れ ま す 。 
cos の 9 一 sin の 0 
[(r' у ll=[r v l1] sind cos9 0 и D 
a b 1 
7721 а-- Rxcos0ü — R, sinf + Rx 
b= Rxsin0 — R;cos0+ R, 


| 次 元 の 座標 変換 Í 
2 次 元 で の 座標 変換 に つい て 解説 し まし た が , 3 次元 の 場合 も 同様 に 考え られ ます 。 
3 次 元 座標 系 で の 1 点 P( ゃ <) が , P (х, 
| 移動 (MOvement) у, z) に 。 thXhX8h үй, Z 軸 方 向 の 移 
SET, T, T, だ け 移 動 し た と する と , その マト リッ クス 演算 の 行列 式 は , 同時 座標 系 で は , 次 の 
よう に 表現 で きま す 。 


1 0 00 
0 1 00 

[r s^ z 1l]=[x 》 1] =[z+T у-Т, 2-7, 1]— 09 
0 0 10 
gu. лч 


: 3UCUEBURCO 1 点 了 G, y, 2) が X 軸 , Y 
| _ SoeseMScaine) |р 


を PP (х,у, 2) と する と , 次 の 式 で 表す こと が で きま す 。 
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Sz 0 00 
0 S 0 0 
E 1 = Dat бу” Sze Қ” жы 7 
É ша Heb mori o pa PR y e 1] @ 
0 0 01 
[回転 (Rotatom | り が 考え られ ます が , 本 書 で は , 回 転 の 方 向 は 各 


軸 か ら 原 点 に 向かっ て , 反 時 計 方 向 を 正 と する 左手 系 を 基準 と し て 採用 する こと に し ます 。 図形 変換 
は , Ха, Үй, Z 軸 それ ぞ れ に 関す る 回 転 が 考え られ ます 。 
Ф x 軸 中 心 と し た 回 転 

x 軸 の まわ り に 角度 の だ け 時 計 方 向 に 回 転 さ きせ る に は , 回 転 の 中 心 と な る x 軸 の 座標 は 変化 し な い 
DT, ⑪ 式 を 3 次 元 へ 拡張 すれ ば いい の で す 。 そ れ を 式 で 表す と 次 の よう に な り ま す 。 


1 0 0 0 
VELA 0 cos0 sn の 0 
ш # Ue aa 0 一 sin の соѕ0 0 
0 0 0 1 
@ y 軸 た を 中心 と し た 回 転 
同様 た, 次 の よう に 書く こと が で きま す 。 
cos の 0 一 sin の 0 
0 1 0 0 
т кш Xem «d sind 0 cos の 0 
0 0 0 1 
@ z 軸 を 中 心 と し た 回 転 
同様 に , 次 の 式 が 得 ら れ ま す 。 
cos の sin の 0 0 
一 SinO cos 0 0 
[ у ж skir у 2 К — (Q0) 
0 0 0 1 


1 一 15 左手 系 の 回 転 


28 


ніш 3 次 元 グ ラフ ィ ッ クス の 基礎 


i 図形 表示 技術 の 基礎 | 
o ë MEENE — 7777722 2 


ュ ン ピュ ー タ 内 部 に 形状 を 記述 する 方 法 と し て , デー タ 構 造 の 種類 に つい て 述べ , また , 記述 し た 
デー タ の 座標 変換 に つい て 解説 し まし た 。 こ と これ ら の デー タ を , コン ピュ ー タ 上 に 図形 と し て 表示 する 
た め に は , いろ いろ な 考え 方 が あり ます 。 

以下 に 示す 3 つの 座標 系 と 2 つの 変換 で 考え る の が 便利 で , 一 般 的 だ と 思い ます (座標 系 の 名 称 は , 
種々 の 本 に よっ て 統一 され て いま せん 。 内 容 は 同一 で ある の に 違っ て いる 場合 が 多い よう で す 。 本 書 
で は , 以下 の よう に 統一 し ます )。 

() マス ター 座標 系 

種々 の アプ リケーション ・ プ ログ ラム の イン タフ ェ ー ス が 行わ れる 座標 空間 で あり , この 座標 系 上 
で セグ メン ト (図形 要素 ) を 形成 し ます 。 

(B ワー ルド 座標 系 

個々 の 入出 力 装 置 (グラ フィ ッ ク ・ デ ィ ス プレ イ 装 置 等 ) と は 独立 し た 座標 系 で あり , この 座標 系 
に それ ぞ れ の 物体 を 定義 させ て お きま す 。 マスター 空間 で 定義 し た お の お の の セグ メン ト の 相対 的 , 
絶対 的 位置 関係 を 定義 する 空間 で す 。 

(CC スク リー ン 座 標 系 

入出 力 装置 の 物理 的 な 座標 系 を 指し ます 。 こ れ に よっ て , 画面 上 で 実際 に 見 える 空間 が 定義 され ま 
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例え ば , ЛЕЛЖА, В, 形状 も 大 き さ も 同一 な の で , マス ター 空間 で の 定義 は 1 つ に し ます 。 ワ 
ー ル ド 座 標 系 は , マス ター 座標 系 に 記述 され た 物体 を , どこ の 位置 に 表示 させ る か 規定 し た も の で す 。 
マス ター 座標 系 か ら ワ ー ル トド 座標 系 へ の 変換 を 。 イン スタ ンス 変換 と いい ます 。 こ の 変換 に より , 
マス ター 空間 で 定義 し た 対象 物 を , ワー ルド 座標 系 の 中 の 任意 な 位置 に 配置 させ ます 。 ワ ー ル トド 座標 
系 で 定義 し た 空間 は , ワー クス テー ショ ン 変 換 に より , 入出 力 装 置 に 合わ せ て , どの 方 向 か ら どの 方 

向 へ 向い て 眺め て いる か を 定義 し ます 。 

マス ター 座標 系 で 表 さ れる マス ター 空間 と , ワー ルド 座標 系 で 表 さ れる ワー ルド 空間 は 。 と も に 3 
次 元 空間 で あり , この 本 で は 右手 系 で 表示 し て いま す 。 と ころ が , 出力 装置 で ある スク リー ン 座 標 系 
で 表 さ れる スク リー ン 空 間 は , 2 次 元 空間 で す 。 こ の た め に , 3 次 元 か ら 2 次 元 に 変換 する 必要 が 生 
じ ま す 。 これが, 3 次 元 2 次 元 変換 と いう も の で す 。 

通常 , マス ター 座標 系 に 定義 し た 物体 は ワー ルド 座標 系 の 中 で , 位置 , 大 き さ , 傾き 等 の 情報 を 
付加 され て 配置 され (この 変換 は 。 イン スタ ンス 変換 と 呼ぶ ), 私 た ちの 通常 の 世界 と 同様 の 情報 を 
持つ 結果 と な り ま す 。 位置 情報 等 を 持っ た ワー ルド 座標 系 上 に 定義 され た 物体 を , 何ら か の 方 法 で 見 
る 必要 が あり ます 。 こ れ が , ワー クス テー ショ ン 有 変換 を 行っ た スク リー ン 座 標 系 の 表示 モデ ル で す 。 
ワー クス テー ショ ン 変 換 は , 表示 する た め の ワ ー ク ステ ーション に 合わ せ て , また , 表示 し た い 図 
形 に 合わ せ て さま ざま の 変更 を 加え る 必要 が あり ます 。 ウ イン ドウ 変換 ステ レオ 変換 , 透視 変換 等 , 
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その 画面 に 合わ せ て 変更 し 表示 し ます 。 


スク リー ン 座 標 系 は , 表示 装置 また は 出力 装置 に 固有 の 座標 系 で あり , 特殊 な 場合 を 除い て 2 次 元 
に よる 座標 系 で ある と いえ ます 。 そ の た め , 座標 系 相互 問 で , 原点 位置 , 座標 軸 の 方 向 , 原点 寸法 等 


が 異な る こと が あり , 変換 が 必要 と され ます 。 


次 項 以下 , 座標 系 相互 の 変換 技術 に つい て 解説 し ます 。 


|  — マス ター 座標 系 | 
| 球体 A 
| ү 
直方 体 A, B Z 
| ow 
2 x | 
直方 体 C 
X 
物体 の 形状 ( 形 と 大 き さ ) を 表す 


І-І6 3 つの 座標 系 と 2 つの 変換 
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ワー ルド 座標 系 


ウイン ドウ 変換 ワー クス テー 
e ステ レオ 変換 変換 
e 透視 変換 


第 1 章 3 次 元 グ ラフ ィ ッ クス の 基礎 


| ウイ ンド ウ 変 換 


座標 系 間 の 2 次 元 的 な 変換 を ウイ ンド ウ 変 換 (Window translation) と 呼び ます 。 一 方 の 座標 系 
に ある 長方形 の 領域 を , 他方 の (変換 後 の ) 座標 系 の 長方形 の 領域 に 移動 する 技術 で す 。X 1 ター 
ボノ X 1 シリ ー ズ の 場合 , この 変換 に 関し て は WINDOW 命令 文 が 存在 し , あら た め て る 数値 計 算 を 
組む まで も な く で きる よう に な っ て いま す 。 

し か し , ウイ ンド ウ 変 換 は , これ ら の 便利 さ 以 外 に 大 が か りな シス テム を 組む 場合 に は , 1 画面 に 
複数 の ビュ ー ポ ー ト を 設置 する 必要 が ある と いう , 大 切な 要素 を 秘め て いま す 。 こ と と で は , そう いっ 
た こと を 踏ま を て, ウイ ンド ウ 変 換 の 仕組 み に つ いて 解説 し ます 。 

ワー ルド 座標 系 ヤス クリ ー ン 座標 系 に 変換 する 場合 に つい て 考え て みる と , まず , ワー ルド 座標 系 
の 中 で 表示 し た い 座 標 領域 を , 左上 端 の 点 (We Wo) と , 右 下 端 の 点 СИ, Wo) で 囲ま れ た 領域 と 
L, Жы, スク リー ン 座 標 系 の 表示 座標 領域 (ビュ ー ポ ー ト ) を 左上 端 の 点 (Ve V2, 右 下 端 の 点 
(V, V) で 囲ま れ た 領域 と 設定 し ます 。 (We Wo, СИ, Wo), ワー ルド 座標 系 の 座標 値 (Ve 
Vd, (Ve УЫ は スク リー ン 座 標 系 の 座標 値 で ある と いえ ます 。 


° P; (Xv, уш) 


(Ve, vi) 


CX й 


( ГА! IV) 


ワー ルド 座標 系 


X 


図 一 17 ウイ シン ドウ 変換 
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ワー ルド 座標 系 の ウイ ンド ウ 内 の 任意 の 1 点 P, の 座標 を ( ダ , Yo), スク リー ン 座 標 系 の それ に 
対応 する 点 Р, の 座標 を (X, Y) と する と , ワー ルド 座標 系 の ウイ ンド ウ の 横幅 は , 


W,— W, 
点 P。 まで の 左端 か ら の 距離 は , 
ギー We 
と 表せ , その 比率 は , 次 の 式 で 表せ ます 。 
X,— We 
WW, (D 
同様 に し て , スク リー ン 座 標 系 に お いて ビュ ー ポ ー ト の 大 き さ は , 双方 向 の 横幅 を , 
V— V, 
点 P。 まで の 左端 か ら の 距離 は , 
X,— Ve 
と 表せ , その 比率 は , 次 の よう に 書き 表せ ます 。 
X,.— Ve 
V,— Ve © 
① と ② の 2 つの 式 に は , 次 の 関係 式 が 成り 立ち ます 。 
Хы W, N Х,- V. ③ 
W,— W, V—-V, 
同様 に し て Y 軸 方 向 で も , 次 の 関係 式 が 導き 出さ れ ま す 。 
Үш- W, zu Y,— V, 
W.-W,- V,-V, 2 
③ 式 , ④ 式 より , ビュ ー ポ ー ト 上 の 点 P。 の XX 座標 Xo ҮШ Y, は , 次 の 式 で 得 ら れ ま す 。 
— V.— Vi 2 
Xv W,— W, (X, W,)+ Ve 
V, = V, 
Жұ W,— W (У,- W,)+ V, 
⑤ 式 を あら た め て 書き 直す と , 次 の よう に 表現 で きま す 。 
Жаз üXutö 
Y= ë Yes d 
2 EN V.— V, ра ES Vr— Ve Vi V, КЕ 20 V— V, 
た だ し ы W.— W, mr W.— We Vs ç W, W, 4 Vo W,— W, Ws 
これ を あら た め て マト リッ クス で 書き 換え る と , 次 の よう に 書き 表せ ます 。 
a 0 0 
[A Y, ij 三 [Xy Y» 1] 0 な 0 
b d 1 


ただ し а, c: ウイ ンド ウ か ら ビ ュー ポー ト へ の 拡大 率 (また は 縮小 率 ) 
b, d: 移動 量 
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3 次元 ワー ルド 座標 系 内 に ある モデ ル の 見 え 方 は , 観察 者 の 見 る 視点 と 注目 点 と の 位置 に た よっ て 異 
な り ま す 。 先 に 座標 変換 の 過程 で , 図形 の 定義 は マス ター 座標 系 に 定義 し て お き , あら た め て イン ス 
タン ス 変 換 の 後 , ワー ルド 座標 系 に 定義 する と 述べ まし た 。 

ここ で ワー ルド 座標 系 に 定義 され て いる モデ ル は 右手 系 の 座標 記述 で す が , スク リー ン 座 標 系 で こ 
れ を 見 る た め に は , コン ピュ ー タ ・ デ ィ ス プレ イ の 2 次 元 の スク リー ン 図 形 と し て 変換 する 必要 が あ 
り ま す 。 こ の た め , 3 次 元 ワ ー ル ド 空 間 の 適切 な 位置 に 投影 用 の 平面 (すなわち 投影 面 plane of 
projection また は view plane) を 設け る 必要 が 生じ て きま す 。 

7 —Vv КИ Ж(О,- X, Y,Z,) に お いて , 視点 P, CX, У, ZO と 注目 点 P。 (Xa Ya, Za) と を 
決め る と , 直線 P P. を Z 軸 と し た 左手 系 の 座標 系 (Oe X, Y, Z) が 描け ます 。 これ を 視点 座標 系 
と いい , ワー ルド 座標 系 で 定義 され た モデ ル の 位置 情報 を , この 視点 座標 系 で の 位置 情報 に 変換 する 
こと を 視点 変換 と いい ます 。 な お , この 視点 変換 は , 次 項 の 透視 変換 の た め の 前 準備 で す 。 

ワー ルド 座標 系 の 中 の 点 (Xu, Yu, Zu) を , 視点 座標 系 の 点 (Xo, Ye Ze) に 変換 する マト リッ クス 
T, を 求め て みみ まし у う 。 次 の 式 で 表す こと が で きま す 。 

(X, Y, Z 1l)=(X, Y, Z, DT, 

図 ユ 一 18 の よう に , X。 軸 を Х„ 用 平面 に 対し て 平行 に と る と , X, Ye 2Z。 軸 の 方 向 が 自動 的 に 決 

まり ます 。 こ こ で まず , 原点 O, を 視点 Py へ 移動 する 変換 マト リッ クス を 考え る と , 次 の よう に 表 


注目 点 Pa(Xa, Ya, Za) 


Xe 


視線 の 方 向 


1—18 3 次 元 ワ ー ル ド 座 標 系 と 視点 座標 系 
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すこ と が で きま す 。 
[xi Yi 41 = [xx Уш Zw 175 


1 0 0 0 
. 0 1 0 0 

た だ し Ту= 
0 0 1 0 


“ЙА 一 ER 1 
これ に より , X。 お よび X」 軸 は , XZ 平面 に 平行 な 平面 上 で , X, 上 を 軸 の 原点 は 点 Pr と な り 
X3. X, と XX。 の な す 角 を а と し , WE (0,— XY. Z) を Y, 軸 の まわ り に 一 だ け 回 転 し て 新 
LEBER (O,— X; Y,Z) を 求め る と , Х,, Z, 軸 と Xe Y。 軸 と は それ ぞ れ 一 致し ます 。 
これ を 変換 マト リッ クス で 書き 表す と , 次 の よう に な り ま す 。 
[zs $2 ae lle[t ж sz 17 


соба 0 -—sina 0 


0 1 0 0 
es ls Т;- . 
sina 1 cosa 0 
0 0 0 1 
cosa = (Za 2/) sina = тш. 
V (arza) t (zs — Za) V (x»—xaY -(zg— Za) 


ここ で Y。 軸 は , Ү„Л„ 平面 上 に 存在 し て いま す が , 今 の と ころ Y。 軸 と 角度 320-3 Wh Cv 250 
が わか り ま す 。 そ の た め , 座標 系 (0O—2X,Y,2) を X 軸 の まわ り に —8 だ け 回 転 さ せ , 座標 系 
(OQ — X; Y,Z) と する 2, Хз, Y, Z 軸 と 2s; Y, Z 軸 は 完全 に 一 致し ます 。 これ を 変換 マト リ 党 


クス で 書き 表す と , 次 の よう に な り ま す 。 
[xs уз 23 ll-[x2 ys гг 115 


1 0 0 0 
0 cos sing 0 
7275; Тз= . б j 

0 —sing cosg 0 
0 0 0: 1 

m 2 = 2 

idis V (xs—xaY t (z;— za) 

V (x, xa} - (yy— ya) *- (z; — Za) 

sing = zr e 


Vr ха? + (yy — уа )#+(г,— Za) 

これ で 座標 系 (O, — X, Ys) と (O,— X,Y,Z) と の 違い は , Z 軸 の 方 向 だ け と な り , その 結果 
次 の 式 が 成り 立ち ます 。 

[re ye ze 1]=[лз ws zs ЦТ, 


© c ос н 
トー 
| 
© 
+ c» C X5 
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Үш 


PE (Xç, yas 25) 


P 
б, —pf(x,, ys, Z;) 


h =V (x,—xJ)° + (y, —z.J° 


l, =V (x,—x.)° t (yo, — Ya)? -- (z,—z.) 


1-20 座標 軸 の 回 転 ( YeZe 面 に 垂直 な 方 向 の 投影 ) 


以上 を まとめ る と , 次 の よう に 表せ ます 。 
Тә Ti Т» Т» ТҮ 


cosq singsing sinacosB 0 

0 cos —sin 0 

=з sing —cosgsing —cosacosB 0 
—xrcosa—z,sing —xssinagsing — /;со50 — x sing -- cos + yssing 1 


+ z,;cosasin£ + 2;с050с058 


ここ と で T, は, ワー ルド 座標 系 で 記述 され て いる デー タ を 視点 座標 系 に 変換 する マト リッ クス で あ 
る と いえ ます 。 
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最後 に コン ピュ ー タ ・ デ ィ ス プレ イ 等 の 表示 装置 に 表示 する た め に , 3 次 元 空間 に 描か れ て いる 
像 を 2 次 元 図形 に 変換 する 必要 が あり ます 。 そ れ ら に つい て 解説 し ます 。 

最も 単純 な も の は , 観察 者 の 視点 の 位置 が 無限 遠 点 に ある と 仮定 し て , スク リー ン に 平行 に 投影 す 
る 方 法 で す 。 こ れ は , 平行 透視 と 呼び , 3 次 元 図形 の 視点 座標 (X, Y, Z) の 成分 だ け を 無視 し て , 
(X, Y) の 座標 値 を スク リー ン 座 標 系 上 の 点 と すれ ば よい の で す 。 しかし, この 方 法 は , 設計 製図 の 
よう な 寸法 が 重要 と な る 場合 に お いて は 有効 だ と いえ ます が , た いて い の 場 合 は , 3 次 元 空間 内 の 
Znax と Zmin の 値 の 差 が 大 きす ぎる た め に , 遠近 感 の な い 不 自然 な 形態 と な っ て し まい ます 。 

その た め に , 透視 変換 で は , 一 般 的 に , 私 た ち が 実 際 の モデ ル を 現実 の 世界 で 照ら し 合わ せ て 見 る 
こと が で きる よう に , 近く の モデ ル は 大 きく , 遠方 の も の は 小さ く と いっ た 効果 が 出る よう に 工夫 さ 
れ て いま す 。 

こと ここ と では, 視点 変換 で も 述べ た よう に , 視点 を 原点 と し , 各 座 標 軸 を 左手 系 に と り ま す 。 また, ^ 
クリ ー ン 座標 を 原点 か ら ヵ の 距離 に 置き , 3 次 元 空間 の 1 Р(Х, Y, 2) と 原点 を 結ぶ 直線 と , А 
クリ ー ン 平面 と の 交点 が スク リー ン 上 の 点 P' の 位置 と する と , 次 の 関係 式 が 成り 立ち ます 。 


E 


1-21 透視 変換 
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図 | 一 22 透視 変換 に お ける 座標 間 の 関係 


; h 
Жол Ан 
2 


қық 
da lm 


これ を 変換 マト リッ クス で 書き 表す と , 以下 の よう に な り ま す 。 


[^y а тесе s x 1] 


о つど н о 


1 
0 
0 
0 


d E tu 
E h 
y'-—y*— 
= 
2 
Яе. 
2 


これ は , 81—22 を 参照 し て いた だ く と わか る よう に , 7” は 奥行 き 方 向 の 距離 を 示す 値 で 。 Zo 
値 が なぁ の と き Z”= h, Z DED оо (無限 大 ) の と き Z"—2h と な り , クニ ルーoo の 距離 を クア ニ ルー 
2 へ 圧縮 し た 距離 を 表し て いま す 。 
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前 項 ま で で , ワイ ヤー フレ ー ム ・ モ デル お よび サー フェ イス ・ モ デル で の 図形 記述 に つい て 解説 し 
まし た 。 これ ら は すべ て , 物体 を 表現 する うえ で 大 切な , 形状 を 定義 する 仕組 み の 解 説 で あっ た と 思 
われ ます 。 と この 項 で は , 一 歩 進 ん で , これ ら の 物体 を 定義 し た 後に より リア ル に 表現 する 手法 に つ 
いて 解説 し ます 。 

この 技術 は , 最近 で は , コンピ ュー タ ・ グ ラフ ィ ッ クス に よる シミ ュ レ ーション 技術 と し て 注目 を 
集め て いま す 。 本書 で は , これ ら の 技術 の うち マッ ピン グ , レイ トレ ー シ ン グ に つい て 基礎 的 な プロ 
グラ ミン グ を 掲載 し て あり ます 。 そ の 他 の 技術 に つい て は , 機会 が あれ ば 別 著 に て 紹介 し た いと 考え 
て いま す 。 こ と こと では, それ ら の 表現 技術 に つい て の 概念 を 解説 し ます 。 

一 般 に , コン ピュ ー タ に よる 演算 に よっ て , グラ フィ ックス ・ デ ィ ス プレ イ 上 に 視覚 情報 (> = 
レー ショ ン ・ モ デル ) を 生成 する 場合 に 最も 基礎 的 な を モデル は , シミ ュ レ ー ト され る モデ ル の 位置 , 
光源 の 方 向 と 強 さ , 観察 者 の 位置 , スク リー ン の 位置 等 が 設定 され た 後に スク リー ン 上 の ピク セル 
か ら ど の くら い の 光 量 が , モデ ル か ら 観 察 者 の 目 に 入る か を 調べ ぶ ,。 その ピク セル を それ ぞ れ の 明る さ 
に 決定 する と いう 形式 を と り ま す 。 これ を 実現 する た め に , 物体 表現 の 特性 に 応じ し て, 観察 者 の 目 に 
入る 光量 を スク リー ン 分 布 さ せる 技術 が 必要 と な る が , 表現 技術 と し て は 次 の 4 点 が 代表 と され ます 。 


ーー レー 

シェ イデ ィング 表現 技術 は , 今日 の グラ フィ ックス に よる シミ ュ レ ーション 表現 の 基礎 に な っ た 理 
論 だ と いえ ます 。 デ ィ ス プレ イ 上 に 表現 する モデ ル は , サー フェ イス ( 面 ) デー タ を 持た せ , 9-7 
ェ イ ス ・ デ ー タ を 構成 する 多面 体 の 特定 の 点 へ の 光 の 反射 を 計算 させ て 表示 し ます 。 こ れ は 反射 の メ 
カニ ズム の モデ ル 化 と いえ ます 。 

シェ イデ ィング の 方 法 は 。 ラン バー ト ・ シ ェ イ ディ ング (Lambert shading), グー ロー・ シ ェ イ 
ディ ング (Gouraud shading), フォ ング ・ シ ェ イ ディ ング (Phong shading) 25, それ ぞ れ の アル 
ゴリ ズム の 開発 者 に ちな ん で , 3 種 の 方 法 が あり ます 。 

ラン バー ト ・ シ ェ イ ディ ング は , ファ セテ ッ ド ・ シ ェ イ ディ ング (Faceted shading) と も 呼ば れ , 
モデ ル を 記述 する 多面 体 の 中 か ら 単 一 の 多面 体 を 取り 出し , その 多面 体 に (残り の 多面 体 に 関係 な 
<) 陰影 づけ を 行い , その 多面 体 の 計算 が 終了 すれ ば 次 の 多面 体 に 移り , それ を 繰り 返す と いう 方 法 
を と り ま す 。 

この 手法 は , 最も 簡単 で スピ ー デ ィ なか 方法 で す が , 表現 モデ ル が 写実 的 で な く ご つ ご つ し た も の と 
Жж), 現在 で は モデ ル の 形 や 動き を すばやく チェ ッ ク し た い 場 合 に 利用 し て いま す 。 

この 表面 の ど び つ ど ご つ し た 感じ を な く し, より 滑ら か な 表現 を 可能 に し た の が , グー ロー・ シ ェ イ デ 
ィング で す 。 別名 スム ー ズ ・ シ ェ イ ディ ング (Smooth shading) と も 呼ば れ , 多面 体 の 中 心 に よっ 
て 反射 光 を 計算 させ る の で な く , 個々 の 頂点 で 計算 させ る と いう 形式 を と っ て いま す 。 

これ は 各 面 の 陰影 の 輝度 の 平均 を と っ て , 対象 物 が 滑ら か で ある と いう 錯覚 を 起こ させ ます 。 そ の 


38 
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加 1 一 23 
ラジ ン パード * ジ エイ ディ 
ング に よる モデ ル 


= (+ +f +Ñ) 


図 | 一 24 グー ロー・ シ ェ イ ディ ング 41-25 グー ロー・ シ ェ イ ディ ング に よる モデ ル 


た め に , ハイ ライ ト 面 ( 光 が 強 く 当 た っ て いる 面 ) 等 の 表現 の 際 に , 頂点 に た また ま ハ イラ イト の 光 
源 が 当たれ ば よい の で す が , 頂点 あか ら ず れ た 場合 に は うま く 輝 や か な いと いう こと が 生じ る 欠点 が あ 
り ま す 。 

フォ ング ・ シ ェ イ ディ ング で は , グー ロー の 方 法 で の 欠点 を 補う た め に , お の お の の 頂点 で の 法 線 
ベク トル を 求め , その 法 線 ベ クト ル を 多面 体 上 で の 点 に 対し て 補完 する と いう 方 式 を と り ま す 。 

この 方 式 で は , 多面 体形 上 の すべ て の 点 に お ける 法 線 ベク トル を , 図 1 一 24 に ある よう に , #9, 
頂点 で の 法 線 ベク トル を 個別 に 求め , 次 に 辺 の 中 点 で 頂 角 で の 法 線 ベ さ ク トル の 平均 値 を と り , 最後 に 
中 心 点 で 中 点 で の 法 線 ベ クト ル の 平均 値 を と り , それ に 充て る と いう 形式 を と り ま す 。 と この 法 線 ベタ 
トル は , 光源 ベク トル や 観察 者 の 視線 ベク トル と 比較 し て 表す と いう こと に な り ま す 。 

フォ ング の モデ ル は , 次 の よう に 表せ ます 。 

I-LtZ Ll 
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ノー マル ベク トル 
( 法 線 ) 


11—26 フォ ング の モデ ル 1—27 フォ ング ・ シ ェ イ ディ ング 
7 : 観察 者 の 目 に 入る 光 の 強 さ ニ Pixel の 明る さ 
l: アイ マイ 光源 に よる 反射 光 の 強 さ 
>Ы 361 に よる 反射 光 の 強 さ の 和 
І 物体 を 通過 し て くる 光 の 強 さ 
= (kd cos i+ ks(cos j)") • 1, 


L: 光源 7 の 強 さ hd 
i : 光源 7 の 入射 角 ks + : 物体 表面 の 鏡面 度 を 表す 係数 
j : 光源 7 の 反射 軸 と 観察 者 の な す 角 n 


この 手法 は , 計算 に 多く の 時 間 を 必要 と し ます が , 現在 最も リアル な 手法 と し て 使用 され て いま す 。 
し か し , 正 反 射 光 を 三角 関数 の べき 乗 で 近似 し た 場合 に プラ スチ ッ ク 風 の 材質 感 に な っ て し まう と 
いう きら い が あ り ま す 。 


| レイ トレ ー シ ン グ | 


レイ トレ ー シ ン グ (Ray tracing) 表現 技術 は , シェ イデ ィング の 手法 が , 物体 表面 上 の 点 に 入射 
する 光 が ど の くら しい 観察 者 の 方 向 に 向かう の か を 計算 させ た の に 対し , まっ た く 逆 に , 観察 者 の 目 か 
ら 始 まり 画面 に 入る 直線 を 追跡 し それ が 当たる 対象 物 を 調べ る と いう 方 式 を と る も の で す 。 こ の 方 
式 は , 光学 の 法則 に 忠実 に 基づい て いる た め , 最も 写実 的 な 描画 法 と いえ ます が , 逆 に 最も 時 間 を 要 
する 手法 で も あり ます 。 

まず , 観察 者 の 目 か ら 出 た 直線 を 追跡 し , 対象 物 に 当たっ た 場合 に は , その 光線 を 表面 で は ね 返ら 
ж, 最初 の 対象 物 に 何 が 反射 され て いる か を 調べ ます 。 対 象 物 が 透明 度 を 持っ た も の で あれ ば , 対象 
物 表 面 で は ね 返ら させ る だ け で な く , も う 1 本 内 部 に 光線 (通過 光線 ) を 送り 追跡 し て いき ます 。 
通過 光線 は , 対象 物 に 応じ た 境界 の 屈折 率 に 影響 され ます 。 さ ら に 追跡 し て いき 別 の 対象 物 に 当 た 
っ た 場合 に は , 同じ プロ セス が 繰り 返さ れる こと と な り ま す 。 こ の よう に 光線 を た どっ て いく と , + 
れ ら の 陰影 が わか る わけ で す 。 

この 手法 に つい て は , 第 5 章 で 解説 し て いま す の で , そちら を 参照 し て くだ さい 。 
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ノー マル ベク トル 
( 法 線 ) 
光源 


視 
線 
の 
方 
向 


光線 の 始ま り 


Lo 
11—28 レイ トレ ー シ ン グ の モデ ル 1—29 レイ トレ ー シ ン グ の し くみ 


実 モ デル の 世界 で は , ほとん どの 対象 物 に 模様 や 材質 感 等 の テク スチ ャ が 付い て いま す 。 こ の テク 
スチ ャ を 表現 する た め に , 2 次 元 の デー タ を 作成 し 3 次 元 モ デル に は りつ ける と いう 手法 が あり ます 。 
と これ を テク スチ ャ ・ マ ッ ピ ング (Texture mapping) と 呼ん で いま す 。 

2 次 元 の 図形 は , 2 次元 に よる 入力 の ほか , スキャナ, テレ ビ カ メ ラ 等 で 読み 込み , 3 次 元 モ デル 
の 表面 に マッ ピン グ し て ディ スプ レイ 上 に 表現 し ます 。 

図 1 一 30 の よう に , U 一 V 座 標 系 に 取り 込ま れ た テク スチ ャ ・ パ ター ン を , パラ メト リッ ク 曲 面 上 
の U 一 V 座 標 系 に 写像 し それ に 前 記 の シェ イデ ィング を 施し , スク リー ン 画 面 上 に 表示 すれ ば 画面 
上 に 処理 され た 画像 が で きま す 。 こ の 手法 に つい て は 第 4 章 で 詳細 に 解説 し ます 。 


テク スチ ャ パタ ー ン 


1—30 2 次 元 マッ ピン グ 
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[x] | 一 31 
2 次元 マ ッ ピ ング され た 
洗たく 機 の 操作 パネ ル 


— pus  — —— 


2 次 元 の パタ ー ン で は な く , З ШОУ к Ў, バン プ ・ マ ッ ピ ング (Bump 
mapping) の 手法 が 有効 で す 。 

基本 的 に は , 表面 に 凹凸 が ある 場合 に は ,。 サー フェ イス を 相当 な 数 の バッ チ に 分 割 し て 形状 入力 す 
る の が 正式 な 方 法 で ある が , 入力 の 手間 , 多大 な 計算 時 間 を 含め て 大 変 な 労力 を 要 し ます 。 そ の た め , 
2 次 元 の テク スチ ャ ・ パ ター ン を は りつ けり 表現 する 前 に , 面 の テク スチ ャ を 使っ て それ が 適用 され る 
面 を 修正 し , これ に よっ て 面 に 凹凸 感 を 表現 する も の で す 。 

これ は , 対象 物 上 の ビク セル を 選び , その 位置 の 法 線 ベ クト ル を 求め , 次 に バン プ ・ マ ッ ピ ング を 
行う 点 を 探し , その 法 線 ベク トル を 得 て , 最後 に この 法 線 ベク トル を 摂動 する こと に よっ て , ЖЕ? 
セル に 陰影 を つけ る と いう プロ セス を 踏み ます 。 図 1 一 33 は , 電気 スタ ンド の アー メ 部 分 に バン プ ・ 
マッ ピン グ を 応用 させ て いま す 。 


滑ら か な 曲線 T 


し わ の ある 曲面 


01—32 法 線 ベク トル の 摂動 に よる マッ ピン グ [1—33 電気 スタ ンド の アー ム 部 分 へ の バン プ ・ マ ッ ピ ング 
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第 1 章 3 次 元 グ ラフ ィ ッ クス の 基礎 


最後 に , 本 章 で 解説 し て きた 変換 マト リッ クス に つい て まとめ て お きま す 。 
3 次 元 の 変換 を , 変換 マト リッ クス アア で 示す と , 一 般 的 に , 
(X Y Z 1j=[X УА ЦТ ——— F @J 


と 書き 表す こと が で きま す 。 
ここ で 3 次 元 変換 マト リッ クス は 4X4 の 要素 か ら 成り 立っ て お り , 


アア アイ スプ 


L:xüh УШ, 2 軸 に 関す る 移動 (movement) を 制御 する 要素 
‚ [I : хй& уі, < 軸 に 関す る 拡大 縮小 (scaling) を 制御 する 要 


, C, D, Е, P, I: xh, уш, z 軸 に 関す る 回 転 rotation), せん 
断 な ど を 制御 する 要素 
М, N, О: * 軸 方 向 , 了 軸 方 向 , z 軸 方 向 に 奥行 を と っ た 透視 変換 を 制御 す 
る 要素 
P : 図形 全体 の 拡大 縮小 (scaling) を 制御 する 要素 
と 書き 表せ ます 。 


紙面 の 都合 で 簡単 に 変換 技術 に つい て 解説 し まし た が , この 変換 理論 こ に ついては, 種々 の 良書 が 出 
て いま す の で , それ ら を 参考 に し て くだ さい 。 本書 の 以下 の プロ グラ ム に つい て は , これ ら の 理論 に 
基づい て 組ん で あり ます 。 フ ロー チャ ー ト , プロ グラ ムリ スト を 参照 し な が ら , 3 次元 グラ フィ ッ ク 
ス を 自分 の も の に し て くだ さい 。 
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“би 


次 元 画像 処理 技術 入門 


ee 


ーー デザ イン ッ ー ル プログラム | 


と の デザ イン ッ ー ル は , 基本 コマ ンド を 用 いて 画面 上 た グラ フィ ックス を 作り 出す も の で す が , fü 
いた 図形 は グラ フィ ッ ク 画 面 そ の も の に 記憶 させ る こと に な り ま す (コン ピュ ー タ ・ メ モリ ー 上 に デ 
ー タ は 持っ て いま せん )。 

その た め , 画面 上 の ビク セル が どの 色 か が , 画像 デー タ と な り ま す 。 基 本 的 に は , スキ ャ ナー や カ 
メラ 等 が 接続 され , 入力 され る 状態 と な っ た 場合 は , 同様 の 処理 と な り ま す 。 

この 方 法 は ,。 コン ピュ ー タ ・ メ モリ ー 上 に 画像 デー タ を 記憶 する 必要 が な いた め , メモ リー 全部 を 
ュ マ ンド 使用 する こと が で き , パソ ュ ン の よう な 小 規模 な メモ リー 容量 の 機種 に は うっ て つけ の 方 
法 と いえ ます 。 た だ , 画面 上 の カラ ー 情 報 を 画像 メモ リー と し て 使用 し て いる 関係 上 , 拡大 ・ 縮 小 が 
ドッ ト ど と の 大 き さ と な っ た り , 画像 変換 に 関し て は , その た び ご と に 画素 の カラ ー 情 報 を 読み 出し 
て 処理 する た め に , 時 間 が か か る と いう 欠点 が あり ます 。 

これ は , 画面 上 の ピク セル 情報 を 利用 し て 画像 を 作成 し て お り , 後述 の よう に , メモ リー 上 に XY 
座標 値 | 持 っ て いな いこ と か ら 画 像 処理 と いい , それ に より 作ら れ た 画像 を 変換 させ る 技術 を 画像 処 
理 技術 と いい ます 。 

ここ で は , カー ソル 移動 に よる 画像 作成 ツー ル を 紹介 し ます 。 


унуло БЕНЕН 


この プロ グラ ム を 入力 し て 実行 (КОМ) する と , 画面 上 た, 図 2 一 2 の 表示 が 出 て , この ブロ グラ 
ム の デー タ 入 力 媒体 を (1) キー ボー ド で 行う の か , (2) シ ジョ イス ティ ッ ク 1 で 行う の か , (3) シ ジョ イス テ 


ピク セル が メモ リー の 役目 


図 2 一 !| 画像 処理 
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ィ ッ ク 2 で 行う の か 聞い て きま す 。 

(1) の キー ボー ド で 行う 場合 は , [を 入力 し て テン キー に 配置 され た 指示 に 従っ て 操作 する と , BB 
面 上 の 十字 カー ソル が 動く こと に な っ て いま す 。 

(2) お よび 3) の ジョ イス ティ ッ ク で 行う 場合 は ,。 CPU の 裏面 の 2 個 の joystick 端子 に それ ぞ れ 別売 
の ジョ イス ティ ッ ク を 購入 し , 差し 込ん で お く 必 要 が あり ます 。 

ジョ イス ティ ッ ク の 場合 は , 十字 カー ソル の 動く 方 向 に グリ ッ プ を 倒し , トリ ガー ボタ ン を 押す こ 
と に っ て РЕМ UP させ た り , PEN DOWN させ た り し ます 。 入力 装 置 の 選択 を 終え を る と , いよ い 
よ メ イン メニ ュー 表示 (62-4 と な り ま す 。 

メイ ン メ ニニ ュー は, 1. INITIALIZE, 2. DISPLAY MODE, 3. SAVE, 4. LOAD, 5. 
NORMAL END の 5 つか ら と 成り, 番号 を 入力 する こと に よっ て それ ぞ れ の メニ ュー を 呼び 出し ま 


CHOOSE NUMBER 


L- KEY BOARD 


JOYSTICK а 


3- JOYSTICK = 


Push Any Key !!' ^? E 


図 2 一 2 入力 装置 の 選択 メニ ュー 


қ, | ж 
м ЕЕЕ > 27 
мын D 


ーー デー 


42-3 キー ボー ド と ジョ イス ティ ッ ク 


47 


7. 5 を 選ぶ と 終了 し ます 。 


[ DISPLAY ТОЙ MENU 2 J 


1. INITIHLIZE 
2. DISPLAY MODE 
3. DNE 

4. LOA 
5. № UN END 


Select Number = 


42-4 メイ ン ・ メ ニュ ー 表 示 


ENESCTINEN 02200 
5 が 画面 に 表示 され ます 。 


1 4 は 画面 密度 の 設定 で す 。WIDTH 40 の 場合 は 。 2 画面 が ある の で , 必要 に 応じ て 4. 
SCREEN CHANGE を 使用 し て くだ さい 。5. SCREEN CLEAR は , 画面 上 の 絵 を 消去 し , 6. 
EXIT は , 図 2 一 4 の メイ ン メ ニュ ー 人 戻し ます 。 こ こ で も 番号 の 入力 で , それ ぞ れ 作動 し ます (た 
JL, 後述 の マッ ピン グ 処 理 を 行う た め の 画 像 入力 は , [3] キー 入 力 に て SAVE し た 画面 の み で 使用 
で きる の で ど ご 注意 くだ さい )。 


[ INITIALIZE 1 


. WIDTH 58 (648 DOT/LINE) 

WIDTH 40 (328 DOT/LINE) SCREEN 1 

WIDTH 40 (320 DOT/LINE) SCREEN 2 
CREEN "a 《ONLY WIDTH 49) 


сэлф NN 


図 2 一 5 | | 
INITIALIZE メ ニュ ー 表 示 Select Number =Ё 


аанын 
を 呼び 出す と , 図 2 一 6 が 表示 され ます 。 画 面 下 
の アル ファ ベッ ト を コマ ンド と 見 な し て 入力 する と , それ ぞ れ の 命令 が 実行 され ます 。 
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ATF, それぞれ の 命令 に つい て 概説 し ます 。 
ФВ: BACK 

国 キ ー を 入力 する と , バッ ク カ ラー を 指定 で きま す 。 下 部 に , カラ ー 表 示 (0: 黒 1:35 2:38 
3: マゼンタ ( 紫 ), 42% 5: v TV KE) 62%, 7: É) が 出る の で , この 表示 を 確認 し な が ら 
背景 色 を 指定 し て くだ さい 。 
Q Pp: PAINT 
P+- XATA t, カー ツル を 囲む 閉 曲線 内 を , C ュ マン ド で 指定 し た 色 (カー ツル の 人 色 ) で 
塗り つぶ し ます 。 

境界 線 の 色 は 黒 を 除く 7 色 で す 。 境界 線 が 完全 に 閉じ て いな いと 色 が は みみ 出し て し まい ます の で 注 
意 し て くだ さい 。 

QU: PEN UP 

[Ux —EAJH 56, カー ソル を 移動 し て も 画面 に 軌跡 は 描か れ ま せん 。 カ ー ソ ル を ベン に 見 た 
て る と , ペン を 紙 か ら 離 し て いる 状態 に な り ま す 。 
ӨС: COLOR 

[GC キ ー を 入力 する と , カー ソル で 描く 線 や PAINT の 色 を 指定 で きま す 。 下 部 に カラ ー 表 示 (0: 
黒 , 1: 青 , 2: 赤 , 3: マゼンタ ( 紫 ) 4:8, 5: シア ン ( 水 色 ), 6 : 黄 , 7 : 白 ) が 出る の で , カー 
ソ ツル の 色 を 指定 し ます 。 


ЖТ 


+ 


コマ ンド ・ リ スト 


ү ІР E: END Ff: ВОХ Rr: CIRCLE L: LINE 


N DOWN T:TILE ñ: BRUSH Ss: SPLINE 04: DELETE 


十字 カー ソル の 位置 座標 
プ ブラシ ( A コマ ンド ) の 幅 
コマ ンド 表示 


2 一 6 DISPLAY MODE の 表示 画面 
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ФУ: VARY 

[VM キ ー を 入力 する と , 描い た 絵 の カ ラー パレ ッ ト ・ チ ェ ン ジ が で きま す 。 
ФП: PEN DOWN 

[D キ ー を 入力 する と , カー ソル の 軌跡 に 線 が 描か れ ま す 。 ペ ン を 紙 に つけ た 状態 で す (ショ イス テ 
ィ ッ ク の トリ ガー ボタ ン を 押し て る, 同様 の 状態 に な り ま す )。 
ӨЕ: BOX 

最初 に [FI キー が 押さ れ た と き の カ ヵ カーソル 位置 と , 次 に 押さ れ た と き の カ ヵ カーソル 位置 を 対 角 と する 
長方形 を 描き ます 。 
Фї: BOX (ベイ ント ) 

Fl [1] (小文字 ) に する と , 長方形 内 部 を ベン カラ ー の 色 で 塗り つぶ し ます 。 指定 の 方 
法 は F と 同様 で す 。 
QR: CIRCLE 

最初 に [RI キー が 押さ れ た カー ソル 位置 を 中 心 に 設定 し , 次 に [R| キ ー が 押さ れ た 位置 か ら 中 心 ま で 
の 距離 を 半径 と する 円 を 描き ます 。 さ ら に 点 を 移動 し [R| を 押す と , その 点 を 円 周 に 含む 円 を 描き ま 
す 。 
Qr: CIRCLE (ペイ ント ) 

[キー (小文字 ) で 入力 する と , 円 の 内 部 を ペン カラ ー の 色 で 塗り つぶ し て 描き ます 。 
eL: LINE 

最初 に [し 上 | キー を 押し た と き の カ ー ソ ツル 位置 を 始点 と 設定 し , カー ツル を 移動 し て 次 に [L| キ ー を 押 
し た と き の カ ー ソ ル の 位置 を 終点 と し て 直線 で 結び ます 。 引き 続い て カー ソル を 移動 し て , [IL] キー 
を 押す と 前 の 点 か ら 連 続 し て 直線 を 引く こと が で きま す 。 
@Ss: SPLINE 

3 点 以 上 の 点 を 指定 し , その 間 を 曲線 で 描く と き に 使用 し ます 。 [S] キ ー を 押し , 閉 曲 線 (ルー プ ) 
な ら ば [1] キ ー, 開 曲線 (ノン ルー プ ) な ら ば [0] キ ー を 指定 し ます 。 そ の 後 , カー ツル を 動か し , [S 
キー を 押す ご と に 点 が 指定 され ます 。 3 点 以 上 の 点 を 指定 後 [s] キ ー (小文字 ) を 押す と , [S] キ ー で 
指定 し た 点 の 順に 滑ら か な 曲線 で 結び ます 。 閉 曲線 の 終点 つ 始 点 の 間 も 結 ば れ ま す 。 
@Q: DELETE 

操作 ミス 等 に よっ て , 誤っ た 位置 に 点 を 指定 し た 後 , これ を 取り 消す の に 使い ます 。L, F, f, R r 
の 機能 を 解除 する と き に [Q| キ ー を 使用 し ます 。 な お 以上 の ュ マ ンド は , Q コ マン ド を 使わ な く て も , 
U, D, X, Z, C, B, P, p, を 除く 他 の ュ マ ンド を 使用 する と , 自動 的 に 解除 され ます 。 
Өс: DELETE 

L, F, f, R r の コマ ンド の と き , 回 キー を 入力 する と , 1 つ 前 に 実行 し た 部 分 を 解除 し ます 。 
eT: TILE 

P, p コマ ンド と 同様 , ペイ ント 機能 で す が , 8 色 に 限ら ず , 色 を 複数 の 色 の 混合 色 で 設定 で きる 
DT, 中 間 色 や タイ ル パ タ ー ン の 表現 に 使用 し ます 。 [T| キ ー を 押す と , 色 の 組み 合わ せ パ ター ン を 
開い て くる の で , 数 字 で 色 を 入力 し て いき ( 例 :2 4 5, 最後 に [CRI キ ー を 押し ます 。 す る と , 
指定 され た 組み 合わ せ に よる パタ ー ン が 最 下 行 に 表示 され , Yes No で 確認 を 求め て くる の で , 
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キー, [NN キー の いずれ か を 入力 し ます 。 [jJ キ ー を 押す と ペイ ント が 実行 され , [IN] キ ー で は 色 の 組み 
合わ せ を 再 入力 する こと が で きま す 。 終 了 し た い 場 合 に は , [IE キー を 押す と 何 も 実 行 せ ず に メニ ュ 
ー に 戻り ます 。 
@A: BRUSH 

エア ー ブ ラ シ の よう な 絵 が 描け ます 。 [Al キー を 入力 する と , ブラ シ の 細か さ (0 一 8 の ドッ ト の 
Ж) を 聞い て きま す 。 例 えば , [8] キ ー を 入力 する と , D と 同じ 使い 方 となり ます (D の 1 ドッ ト が 8 
ドッ ト で 出る )。 
ФЕ: END 


Е-Е лил = КВ) X4, 
| メイ ン メ ニュ ー か ら SAVE を 呼び 出す と , 


| SAVE 2 一 7 が 表示 され ます 。 フ ァイル ネー ム 十 CRI キ 
ー で , 描い た グラ フィ ッ ク の 画面 を SAVE する こと が で きま す 。 


[ SAVE 1 
FILE NAME ? C/'-RETURIO. BI 


図 2 一 7 SAVE 時 の 画面 

メイ ン メ ニュ ー か ら LOAD を 呼び 出す と , 図 
| LOAD | 2 一 8 が 表示 され ます 。 フ ァイル ネー ム 二 [CR] キ 
ー で , SAVE し て いた グラ フィ ッ ク の 画面 を LOAD する こと が で きま す 。 


[ LORD ] 
FILE NAME ? で だ =RETURN) H 


図 2 一 8 LOAD 時 の 画面 
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1. WIDTH 80 (640 DOT/ILIINE) 


1. INITIALIIZE 


2. WIDTH 40 (320 DOT/LINE) SCREEN 1 


3. WIDTH 40 (320 DOT/LINE) SCREEN 2 


4. SCREEN CHANGE (ONLY WIDTH 40) 


5. SCREEN CLEAR 


6.ЕХІТ 


2. DISPLAY MODE B: BACK 背景 色 を 選択 する 。 


Р: PAINT カー ソル を 囲む 閉 曲線 内 部 を C' で 選択 し た 色 で 塗る 。 


р: PAINT 境界 色 を 指定 で きる ペイ ント 機能 。 


U: PEN UP カー ソル の 軌跡 が 描か れ な い 状 態 。 


メイ シェ メニ ュー に も を どる 。 

C: COLOR カー ソル の 軌跡 の 色 を 選択 する 。 

V: VARY 描い た 絵 の カ ラー パレ ッ ト を チェ ンジ する 。 
D: РЕМ ООММ | カー ソル の 軌跡 が 描か れる 状態 。 

T: TILE COLOR 複数 の 色 を 合成 で きる ベイ ント 機能 。 

F : BOX 指定 され た 2 点 問 を 対角線 と する 長方形 を 描く 。 


O 


> 


指定 され た 2 点 間 を 対角線 と する 長方形 を 描き , 内 部 を 塗る 。 
R: CIRCLE 指定 され た 2 点 を 半径 と し て 円 を 描く 。 


r : CIRCLE R と 同様 に 円 を 描き , 内 部 を 塗る 。 


i 
四 


L : LINE 指定 され た 2 点 問 に 実線 で 直線 を 引く 。 
A: BRUSH カー ソル の 軌跡 が 任意 の 点 (0-8) で 描か れる 。 


Ss: SPLINE 3 点 以上 の 点 を 通る カー ブ を 描く 。 


Q: DELETE L, F, f, R, r の 機能 を 解除 する 。 


q : DELETE L, F, f, В, r の コマ ンド の 時 , |! つ 前 に 入力 し た コマ ンド 
を 解除 。 


3.SAVE | グラ フィ ッ ク 画 面 を SAVE す る 。 


4.LOAD | 3 で SAVE し た も の を LOAD する 。 


NORMAL END 
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| デザ イン ツー ル ・ プ ログ ラム の 内 容 | 


この プロ グラ ム は , 大 きく 画像 を 作る た め の サ ブル ー チ ン と , それ を フロ ッ ピ ー 装 置 や デー タレ ュ 
ー ダ に 記憶 きせ た り , 呼び 出し た りす る LOAD/SAVE の サブ ルー チン に 分 か れ ま す 。 基 本 的 に は , 
フロ ー チ ャ ー ト や 変数 表 を 参考 に し て いた だ けれ ば 理解 で きる か と 思い ます が , 簡単 に 概略 を 紹介 し 


行 番号 100 一 210 行 は , 初期 設定 で す 。 基 本 的 に , ュ ユン ピュ ー タ ・ メ モリ ー 上 に デー タ は 記憶 させ て 
いな いと 解説 し まし た が , 160 行 と 170 行 の 配列 変数 は , スプ ライ ン 曲 線 を 描く うえ で の デー タ を 記 
憧 させ て お くだ た め の も の で す 。 ス プラ イン 曲線 の 点 群 は , 202 個 まで 持つ と と が で きま す 。 

行 番号 300-360 行 で メイ ン メ ニュ ー 表 示 と キー 入力 を 行っ て いま す 。 
400—580f;'C, 描く グラ フィ ッ ク 画 面 の 画面 設定 , 600 一 650 行 は 背景 色 の 設定 ルー チン , 
700-750 行 で 指示 ベン の カラ ー 指 定 , 800~1070 行 で PALET 色 変 換 シ ー チ ン , 1200 一 1480 行 で デ 
ィ ス プレ イ ・ コ マン ド の メニ ュー 表示 を 行っ て いま す 。 
1500 一 1610 行 で 十字 カー ソル を 読み 込ん で 取り 出す ルー チン , 1620 一 1830 行 で コマ ンド 表示 と 指 
示 メ ニュ ー, 1840 一 1970 行 で マ ョ イス テッ ク に よる 十字 カー ソル 移動 量 の 指示 , 2000 一 2190 行 で 十 
字 カ ー ソ ル の 移動 の た め の ル ー チ ン , 2200 一 2250 行 は 直線 を 引く サブ ルー チン , 2300—2350fT G FÉ 

ックス を 描き , 2500 一 2590 行 で 円 孤 を 描く , 2590 行 は 円 孤 内 を 原点 か ら 塗 りつ ぶし ます 。 

2600 一 2770 行 で , 描い た 図形 の 削除 の た め に , 黒色 で 塗り つぶ し ます 。2800 一 2870 行 で 乱数 に よ 
り 点 群 を 打ち 出し ます 。3000 一 3600 行 で スプ ライ ン 曲 線 を 描く た め の ル ー チ ン , 4000 一 4700 行 で 中 
間 色 を 作る ルー チン を 行っ て いま す 。5000 一 5170 行 は 画面 の LOAD, 6000~6280 行 で 画面 の 
SAVE, 7000 一 7100 行 で 入力 デバ イス の 設定 , 9000-9210 行 は テラー 処理 シー チン , 9500--9520 
行 で カラ ー 名 の デー タ を 表し て いま す 。 

いずれ の プロ グラ ム も , 詳し いこ と は 紙面 の 関係 で 省略 し ます が , 別 著 「 プ ログ ラミ ング ・ テ クニ 
ッ ク 集 」 (学研 版 ) を 参考 に し て いた だ けれ ゆば, 十字 カー ソル を どう 作っ た らい い の か , どう 動か し 
た らい い の か 等 , 詳細 に 解説 し て あり ます 。 興味 の ある 方 は , お 読み くだ さい 。 


コマ ンド 


ル ・ コ マン ド の まとめ | 


行 番号 


能 


コマ シド 机 行 番号 
B 背景 色 の 設定 610— 650 T タイ リン グ ペ イン ト 4010—4700 
© ペン カラ ー の 設定 710— 750 V カラ ー パ レッ ト の 変更 810— 910 
E メイ ン メ ニュ ー 復 帰 У; メニ ュー の 切り 替え 1060— 1070 
F 長方形 2310—2350 f 長方形 の ベイ ント 2410—2420 
L 直線 2210— 2250 p 境界 線 の ペイ ント 930— 1050 
P ペイ ッ ト 920 q デリ ー ト 2610—2770 
Q コマ ンド 解除 2430—2470 r 円 の ペイ ント 2560—2590 
R m 2510—2550 | s スプ ライ ン 実 行 3100—3600 | 
S スプ ライ ン 曲 線 の 設定 3010— 3090 | 
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デザ イン ツー ル ・ プ ログ ラム 出力 例 


配列 変数 
PAL ( ) パレ ッ ト 番 号 X() スプ ライ ン 点 の XE 
PC( 2 境界 色 ҮЗЕ 9 スプ ライ ン 点 の Y 座 標 
CS ( ) カー ソル デー タ CP ( ) スプ ライ ン 点 上 の 色 
| cso ( ) | カー ソル 上 の デー タ 退 避 用 | CL$ ( ) | 色 の 名 前 
ZB( ) DM$ ( ) 中 間 色 タイ リン グ パ ター ン デ ー タ 
ZC( ) | BL$ ( ) 中 間 色 青色 デー タ 
ZB1( ) . : | RD$ ( ) 中 間 色 赤色 デー タ 
スプ ライ ン 計 算 用 = 
ZB2 ( ) GR$ ( ) 中 間 色 緑色 デー タ 
283 ( ) 
284 ( ) 
変数 
MY ディ スプ レイ メニ ュー 表示 位置 ( 縦 ) AB ブラシ の サイ ズ 
М! L ライ ン の 判定 
画面 の WIDTH 

W R 円 の 判定 
XE 画面 横 の 最大 値 B ボッ クス の 判定 
YE 画面 縦 の 最大 値 RR 円 ベイ ント の 判定 
SC WIDTH 40 の 画面 BB ポッ クス ペイ ント の 判定 
BC 背景 色 番 号 SP スプ ライ ン の 判定 
PC ペン カラ ー M スプ ライ ン の 点 の 数 
LM ディ スプ レイ メニ ュー 切り 替え LP Loop また は Noon Loop の 判定 
X カー ソル 現在 位置 の X 座 标 NM$ タイ リン グ パ ター ン の 文字 列 
Y カー ソル 現在 位置 の Y 座 標 TL$ 

タイ リン グ パ ター ン 
3 ベ ペン の up, down 判 別 TL1$ 
JST カー ソル キー また は ジョ イス ティ ッ ク 
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コス モス 


DISPLAY 


テン キー また は 
JOYSTICK 取り 込み 
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デザ イン ツー ル ・ プ ブロ グラ ムリ スト 


1 ыы а аа ааыа 

5 "£ DESIGN TOOL FROGRAM  V.2 * 

47x * 

Ej ax Frrogrammed Ey Г SAIMU 1 * 

6 “Ж x 

7 7% 1985 . 4. 1 x 

в 7% Ж 

© *ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ 

ТӨМ Jesse мат ТІ кессе енен нет 
116 ON ERROR GOTO 9888 

120 WIDTH 40,2253,0,1:HELIST 日 :KEMDDE Ü 27% (ХІ turbo) 
150 “WIDTH 48 2% (XI ) 


14 DEFINT А-У: INIT 

158 DIM FRL( ア 2) ,PGCCo6),0S(50 ,USB(S) 

168 DIM ZB(2Z), ZC(2), ZB1 (2), ZB2(2), ZB 2) , ZBA (2) 

178 DIM X(2802),V(2082),CF (282) 

188 DIM CL$(7),DM$(C) 。 BL ま ( プ ) ,RD$(7) ,GR$(7) 

198 EEY 5, "БОТО 2800"-CHR$(€13) 

200 RESTORE 9518 

218 FOR 1=8 TO 7:READ CL ま (T) :FAL(CI -I:NEXT 

220 GOSUB 7090: Мү=22 

230 WISSO:W-sWI/480: XE-WIXB-1:YE-z199:85Cz80:G0SUE 588 
300 '———— メイ ゴー ンー TOOT SA --------------------- 
318 GOSUE 1298:PFRINT"L DISPLAY TOOL MENU 2 1":PRINT 
S20 PRINT" 1. INITIALIZE":PRINT" 2. DISPLAY MODE" 
338 PRINT" Ж. SAVE" 

548 FRINT" 4. LOAD":FRINT" 5. NORMAL END"'":GOSUE 1458 
508 ММеМм0:0М MN GOSUR 460, 1500, 4000, 3006, 370 

360 GOTO ZAA 

378 INIT:CLS 4:WIDTH 80:END 


АЙ Ў a H AL Тәү --------------------.-.-......-......-.-.----.. 
418 GOSUR 1290:РБІМТІГ INITIALIZE J'":FRINT 
420 PRINT" 1. WIDTH ӨЗ (5480 DOT/LINED" 


430 PRINT" 2. WIDTH 40 (03280 DOT/LINE) SCREEM 1" 
448 PRINT" 3. WIDTH 40 (3206 DOÜT/LINE? SCREEN 2" 
450 FRINT" 4. SCREEN CHANGE (ONLY WIDTH 49)" 
460 FRINT" 3. SCREEM CLEAR":PFRINT" 6. EXIT" 

а?а GOSURI49 

ава MNIzNO:ON Ммі GOSLB 500., 510,320, 376, 380,570 
4208 БОТО 409 

ее wI-880:SC-«8:GO0TO 560 

S180 WI-480:rSC-O:G0TO 3680 

S280 WIs4O0:SC-li:G0TO 560 

SB IF WISSA THEN RETURN 

S480 SC-SC-1: IF SC-2 THEN SC-8 

асы SUREENM 5С. 5С, Я: RE TLURN 
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seg 
570 
580 
6808 
618 
620 
e38 
ó640 
6589 
7868 
718 
720 
7308 
740 
750 
8ag 
818 
829 
8: 
gag 
850 
860 
878 
880 
890 
20A 
918 
9280 
959 
940 
9589 
o6 
978 
989 
998 
1006 
i818 
18028 
1030 
18480 
1858 
1868 
1978 
1266 
1218 
1228 
12509 


SCREEN SC,SC,80: ИІрТН WI: RETURN 
W-WI/40: XE-ZUIXS8—-1:RETURN 35080 
CL.S8: RETURN 
”一 一 一 一 一 一 一 一 一 一 Аяла ма? 2 セ ゅ テ チャ 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 
GOSUR 1590:GOSUE 1200: GOSUR 1418 
РКІМТ"ВАСЕ COLOR (B=RETURN) 20"; 
C=VAL (INEEY$(1)):FRINTC: IF (С>8)%(С<08) THEN 628 
IF С-В THEN 12908 
BC= C: GOSUR 14z80:GOTO 628 
”一 一 一 一 一 一 一 一 一 一 ч9:, カラ マー / セ ゅ チャ 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 
GOSUE 15908: GOSUBRB 1280: GOSUR 1418 
FRINT"FEN COLOR (8-RETURN) 20"; 
Cz-VAL (INEEY ま (1) ) z£ FRINTC: IF (СУ8) + (С<08) THEN 720 
IF C-8 THEN 1298 
РС= C: GOSUR 14208: БОТО 1298 
d E JL F= / ^L е 
GOSUE 1390: GOSUER 1200 
БОСОВ 14180:PRINT"COLOR CHANGE FROM ": 
FC1=VRL (TINEEY ま (1 ) ) 
IF (FCiIZOD-(CFC1-8) THEN 8298 
IF FC1-8 THEN 1298 
CLSs;PRINT"COLOR CHANGE FROM "sCLSOECI)s'" TO "s 
FC2zVALOGDINEEY$O€1)) 
IF (FC2Z80-c-(CFC2728B) THEN 8298 
IF PFC2-8 THEN 12908 
FALET FC1I,FCZ2:PFAL(GCPCIiIO-FCZ2:GOSUER 12900: GOTO 8298 
FOR IO TO 7:FAL(CI)-I:NEXT:FALET: RETURN 
FAINT (Х,ҰҮ),ҒС,1,2,5,4,5,6,7: CCZFC: RETURN 
GOSUE 1290: GOSUE 1288: GOSUER 14108 
INFUT"BOUNDAEY COLOR (BRETURN) ? ",CL $ 
IF LEN(&CL$) 77 DR LEN(CL$)z1 THEN 948 
FOR Ісі TO 7 
IF LEN(CL$?zI THEM FC(COI-1)-FC:GOTO 1818 
A$-MID£$(LS.1,1) 
IF ASC(A$)<48 ОК ASC(A$) >55 THEN 948 
FC (I—1)=Víñl_ (A$) 
NEXT 
FCO=FC (8) :: РСі=ЕС (1 s FC2=FC (2) s FECZ=FC (3) 
PCAZPCCOA):PCS-FCOO:PFPCS-PCOÓ) 
PAINT íX Yra ЕС,РСОӘ,РСІ,.РСЗ,РСЗ,РСА,РСЕ,РС6 
GOSUE 12980: RETURN 
LMz-LMs:OM (LM-&-Z)/2 БОСОВ 1528, 4 2985 
RETURN 
не テー オマ フレ イー メニ ュ ウ ーー プー ヨロ ゆ ロミ に ーー ーーーーーーーーーー 
(0SUR 1428 
FOR I8 TO 7 
LOCATE WxiOX(i(I MOD 4),MY-c-INT(OCI/4) 


37 


PRINT USING"#"; I; 
IF I=8 THEN FRINT" m ";::GOTO 1278 
COLOR IT:FRINT" HM "::COLOR 7:ELSE FRINT" O"; 
PRINT CL$(FAL (І) ) ;: NEXT: RETURN 
NEXT: RETURN 
БОБОВ 1428:PFRINT"E: BACKE Рр: FAINT U: РЕМ "š 
PRINT"UF Е: END  ";:IF W=2 THEN PRINT 
PRINT"C: COLOR V: VARY D: FEN DOWN T:TILE"; 
IF М-і THEN 1340 
IF W-1 THEN GOSUE 1428 ELSE CONSOLE МҮ,2,40,40 


FRINT"Ff: BOX Rre CIRCLE Le LINE ü 
FRINT"A: BRUSH Ss: SFLINE Qq: DELETE "s 
GOSUB 1410:CREV 1 

PRINT" — ":SCL$((FAL(GPC)2s3" "a 


CFLASH1:PFRINT DEYS$:AaB::CFLASHO: CREVO: БОТО 1478 
ЕКИ В: CONSOLE: CLS:GOTO 1430 

PRW 8: CONSOLE MY,Z2:CLS: GGOTO 1420 

РКИ G:CONSOLE MY-c-2,1:CLS:GOTO 1420 

FRW8a: CONSOLE МҮ, X:CLS 

IF BC-7 THEN COLOR Z,RBC:RETURN 

COLOR 7-EC, EC: RETURN 

GOSUE 14180:FRINT"Select Number ="; 

МО= УА CINEEY$CI)) z "RINT NO: RETURN 

LOCATE 195,MY-2:PRINTUSING "SHH'"iXi:PRINT",": 
FRINTUSIN(G"3B4HE" : Y; : RETURN 

”一 一 一 一 一 一 一 一 一 一 テー イマ プレ イー 79[]2" 394 ААА 
GOSUB 1390: X=W: Y=1:FC=7: DEY ま =" U": GOSUE 1290 
LMz1:XXz-W:YYzi1:FzO:R-cO0:EB-0:RRE-O0:BE-9:SF-O 
CC8-8: СС=0: X8=W: YOz1: XL =W: YL-1:F-8 

БЕТЕ (8,0)0—(2XWH,2),CS8,7 

LINE (8,8)—(2XW,2),.FSET, 8G, EF 

LINE (W,8)—(W,2),FSGET,7 

LINE CB15-(02*,1),PB8ET,.7 

GETE (8,80)—(2XW,2),CS80,7 

IF JSTE > THEN DEYS$-zINEEYS$:GOTO 1610 

DEY ま =TINEEY ま (1 ) 

FUTE (X=W,Y=1y-= (X+ YEL) , CS,FSET, 7 

IF DEY$="A" THEN GOSUE 2800: GOSUE 12608 

IF DEY£$-"B" THEN GOSUE 6108 

1648 IF DEY$-"C" THEN GOSUE 788 

16580 IF DEY£$-"D'" THEN GOSUER 1Z60:F-1 

16680 IF DEY$=" E" THEN GOSUE 24280:GOTO 2468 

1678 IF DEY£$-"F" THEN GOSUR 1260:606МЕ 2ЖӨ@ 

16808 IF DEYS$-"L" THEN GOSUB 1550: 65050Е 2200 

1690 IF DkY$z-"F" THEN GOSUE 9280 
1788 IF DEY$=" Q" THEN GOSUE 2420 
DEYS$-"R" THEN GOSUE 1360: GOSUE 


25388 
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DEY$-"S" THEN GOSUR 20800: 50506 1268 
1738 IF DEY$-"T" THEN GOSUE 40880: GOSUB 1290 
17480 IF DEY$="U" THEN GOSUE 1368:F-8 

1788 IF DEY$-"V" THEN GOSUE 1368:GO0SUB 800 
1768 IF DkEY$-"/" THEN IF W=1 THEN GDSUE 1868 
1778 IF DkY$-"f" THEN GOSUR 24808 

1788 IF DEY£$-c"p" THEN GOSUB 938: CC-FC 

17980 IF DEY$-"q" THEN GOSUB 2688 

1800 IF DEY£$-'"r" THEM GOSUB 25608 

18180 IF DkY$-"s" THEN GOSUB 31988:SF-8 


1828 IF DEY£$-"8" THEN X=W: Y=1 :GOTO 26850 
1858 IF DEY ま = リー リ THEN X-WIxX4:Y-188:GOTO 2858 
1848 DETE (X-W,Y—-1)—OXCFW,. Y*1) ,CS,7 


1858 FUTE (X—-W,Y-1)—-(X+W,Y+1),CS0,FSET,PC 

1868 STE-STICE(JST) 

18780 FUTE (X-W, Y-1)—(OC-W, Y-1) , CS, FSET, 7 

1888 IF JSTz28 THEN F= 日 :TF STRIG(JST) THEN F=1 
1898 IF STE-1 THEN XzsX-W:YzY-1:G0TO 2888 


1988 IF STE-2 THEN Y=Y+1 :GO0TO 2008 
1918 IF STE= THEN X-X-W:YzsYc-1:GOTO 2888 
19280 IF STE-4 THEN XzX-1 :GOTO 28088 
1958 IF STE-6 THEN X=X+1 :GOTO 28098 
19480 IF STE=7 THEN XzX-W:YzsY-1:G60TO 2880 
19580 IF STE=8 THEN Y=Yー1 :GOTO 28898 


1958 IF STE=9 THEN XzX-W:Y-Y-1:GO0TO 2888 
1978 FUTE (X-W,Y-1)—-(OX*-W, Y*12) ,CS8, PSET, РС: БОТО 1590 


ЙӨ Teeee—— M ЯУ; ӨРУ NM LL LLL Dn s d E 
2818 IF Х>ХЕ-М THEN X=XE—W 

2028 IF XW THEN X=W 

20:50 IF Y5YE-1 THEN Y=YEー1 

28048 IF Ү<1 THEN Y-1 

2058 IF Үс24 AND MY-8 GOSUR 1420:MY-22:60T0 2198 
28060 IF Y51176 AND MY-22 GOSUE 1420:MY-80:GOTO 2190 


28078 GOSUE 1478 

28088 IF F= THEN 2148 
2898 CC-FOINT(X,YO:IF АВ< SB GOSUB 2840:6GOTO 2110 
2188 LINE (XX,YY)-(X, Y) 。、FGET , FC 

2118 БЕТ (X-W,Y-1)-(X*W, Y-1) ,C8,7 

2128 PUTE (X-W,Y-1)-(X*W, Y-1?) , CSE, PSET, PC 

2158 GOTO 2180 

2148 FUTE (XX-W, YY-1) - CXX--W, YY*1?) , CS, FSET, 7 

2158 СС-РОІМТ (X, Y) 

2168 БЕТ (X-W,Y-1)—-(X^W, Y*1),CS8,7 

2178 FUTE (X-W,Y-1)- OU, Y-12) , CSO, PSET, РС 

2188 XX=X: YY=Y: GOTO 1868 
GOSUR 1298:G60TO0 2888 


39 


60 


IF 1-8 THEN GOSUE 2428:L-1:60TO 2540 
LINE (XL,YL) -(X, Y) ,FPSET,FC 
IF L-1 THEN CCB=PC 


L1z1: XBOzXL : YGzYL. 

XLzX:YL-Y: CC-PFC:FSET (Х,У, СС) : RETURN 
жекен ЧОЙ -------------------------- 
IF B-8 THEN 253 

LINE 4XL,YL)-—-(OX, YO ,FSET,FC,B: ВВ=0: БОТО 2238 
GOSUE 2450: В=1 

Liza 

X8-zX:YO8z-zY: CCO-FOINTOX, YO : БОТО 2250 

> 一 一 一 一 一 一 一 一 一 一 ホロ クマ や タイ フト o ーーーーーーーーーーーーーーーーーーーー 
IF B=B THEN 2330 

LINE (XL,YL)-(X, Y) ,PSET, РС, BF: BE-1:G0TO 2228 
IF SF=1 THEN GOSURB 2560: SF=0 

BE-BO:RR-O:Li1-O0: IF (L-8)xX(CBEB-OD)X(CR-80)0 THEN RETURN 
L=0: B=0: R=0: FSET (ХӨ, YO, CCO) : RETURN 

IF F=0 THEN FSET {X YCC) ELSE PSET (X。Y。FC) 


一 一 一 一 一 一 一 一 一 一 XT ーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 
IF R-8 THEN 2558 
RR=CINT (SR(((XBーX) /W) ^24 (YB8-Y) ^2)) 
CIRCLE(X8, YO) , RR, PC, Rs RR-B: БОТО 2258 
RR-8:GOTO 2258 
GDSUB 24z80:R-1:GOTO 2258 

IF R-8 THEN 2558 
RR=CINT (SAR (C CCXB-X) /W) ^2 (YE-Y) ^2)) 
CIRCLE (X8,Y8),RR,FC,R:PSET (XB, YO, 8) 
PAINT (X8,Y8),PC:RR-1:GO0TO 2258 
ea p^ リー トド 0 
IF SF=1 THEN GOSUB 5529 

IF L=1 THEN 2758 

IF BB=1 THEN 2740 

IF Беі THEN 2778 

IF RR-1 THEN 2718 

IF R-1 THEN 2698 
RETURN 

XzXB8:YzYO: XXzXs YYsY: XL=X: YLsY: CC=FC: RETURN 
RR=CINT (SBHR(((X 昌 -XL) /W) ^24 (YO- YL) ^2)) 
CIRCLE (X8,Y8) ,RR,O,R: :GOTO 2748 
RReCINT (SOR (C (XO-XL) /W) ^2 (YB-YL) ^2) ) 
CIRCLE (X8,Y8) , RR, G,R: PSET (XB, YO, РС) 
FAINT(X8, YO), B: PSET (XB, YO, CCA) 

X=XL: Y=YL: XXX: YYzY: СС=9: RETURN 
LINE (X8, YO) - (XL, ҮШ), ЕЗЕТ, 8: GOTO 2688 
LINE (X8,Y8)-(XL, У), РЅЕТ, Ө, BF: БОТО 2688 
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2818 
2828 
2838 
2848 
28598 
2868 
2878 
380098 
3818 
3828 
38938 
3848 
3858 
38068 
38078 
3888 
3898 
3108 
3118 
3128 
S138 
3148 
3158 
3168 
3178 
i188 
3198 
32808 
3218 
3220 
3238 
52408 
i298 
3268 
35278 
i288 
i298 
7300 
3318 
55209 
ささ ざさ 日 
5548 
398 
55608 
3378 


LINE (X8,Y8)-(XL,YL),PSET,8G,RE :GOTO 2680 
:---------- エア ー 2-5: ----------------------- 
GOSUB 1410:1NPUT "BRUSH SIZE (8 - 8) -",AB 
IF АБ<@ OR АВ>8 THEN 2818 
RETURN 
FOR I-1 TO AB 
BR-ABXRND (1) : ВБ=РАІ (2XRND (1) ) 
FSET (2KBRXSIN(BG) *X, ERKCOS (EG) +Y, FC) 


———— の で ライ ҚО | жанрны нына кет еее iria етене 
SF=1: IF M=0 THEN 38058 
IF М>1 AND Х-Х(М-1) AND Y=Y(M-1) THEN RETURN 
X(M)=X: Y CH) Y: CP (M) =FOINT (X, Y):FSET(X, Y, PC) 
CC=FC: M=M+1: IF M2200 THEN 5100 ELSE RETURN 
GOSUE 1410:FRINT "Spline Curve"; 
FRINT" 8 = Non Loop 1 = Loop": 
FRINT" Push KEY !!";:C$=INKEY$(1) 
IF C$="0" OR C$="1" THEN LFzVAL (C$) :M=1: RETURN 
GOTO 3868 
IF М<% THEN RETURN 
IF LFz1 THEN 3140 
X(M)=X(1):Y(M)=Y(1):X(8)=X(M-—-1):Y(8)=Y(M-1) 
MzM-1:GOTO 3168 
X(M)=X(1) УСМ) =Y C1) XCME10 X (C222 Y (M+1)=Y(2) 
X (8) X CH—-10 :Y CB) =Y CM—1) 
X1=X(8):Y1=Y(8):X2=X(1):Y2=Y(1) 
X3-X(O2):Y3zY (2): 60506 2298 
FOR 11=1 TO M-i 
X1=X(1I1I):Y1=Y(II):X2=X(II+1)zY2=Y(II+1) 
XS=X(II+2):YS=Y(II+2) : 60506 5290 
X1-2INTCZE1CI)):Y1-2INT(CZBE1(2)) 
FOR ZT=1 TO 7Т2 
GOSUB 5410: ІМЕ (X1,Y1)—-(G,H) ,PSET,PC 
X1-G: Y1-H 
NEXT 
NEXT 
IF LF-1 THEN LINE —(X(1),Y(1)),FSET,FC 
M=8: RETURN 
ZT2=SQR((X2-X1)”2+(Y2-Y1) ^2) 
ZT3zSQ0R(CCOCS-X2)^2-(0Yi-Y2)72) 
ZB(1)2-2XZT3/3/(ZT29ZT3):ZB(G2)z2/3/(0ZTZ2*ZTZ) 
ZBCOX)z—-ZT2/3/(00ZT2-ZTX) 
Fl=X1:F2=X2:F2Z=XZ:GOSUE 2440 
ZGX1=ZB(1 ) XZC(1) -ZB(2) Ж2С (2) *«ZB C3) XZC CX) 
Fl=Y1:F2=Y2:F2=YZ: GOSUE 2440 
ZSY1=ZB(1 ) Ж2С (1) +268 (2) XZC (2) *ZB C3) XZC C3) 
Pl1=X1:F2=X2:ZS1=ZSX:ZS2=ZSX1 


61 


62 


3388 
5598 
5488 
5418 
5420 
3438 
3448 
3498 
5468 
5478 
3488 
3498 
35898 
3518 
3528 
i538 
3548 
5550 
5560 
55708 
3588 
3598 
36808 
4008 
48018 
4028 
49038 
4848 
48058 
4668 
4078 
4680 
48908 
4180 
4118 
4120 
4130 
4148 
4158 
4168 
4178 
4180 
4198 
4288 
42198 
4228 
4230 


E-1:28X-Z28X1:GOSUB 5480 
FPizYi1:P2zY2:281-228Y:282-Z28Y1 
E-2:28Y-28Y1:G0TO 3488 
G-ZB1(1)4ZB2(1) XZT-ZEZ(CIO) XZT^29ZBA CI) XZT^Z 
H=ZB1 (2) +ZB2 (2) KZT-ZBZ (2) KZT^2*-ZEA (2) XZT^3 
RETURN 
7С(1)=1.5Ж(Е2-Р1›)/7Т2 
Z=3% ( (ZT2^2) k (F3-F2)+(ZT3^2)x(F2-F1)) 
ZC(2) =Z/ZT2/ZT さ 
ZU (3)23/ZTXX (F3-F2) : RETURN 
ZB1 (E)=F1:ZB2(E)=ZS1 
ZBZ(E)=Zk(F2-F1)/(ZT2-2)-2xkZS1/ZT2-ZS2/ZT2 
Z=2% (P1-P2) / (ZT2^3) +251/ (ZT2^2) +ZS2/ (ZT2^2) 
ZBA(E) =Z: RETURN 
IF М<1 THEN RETURN 
IF (XeX(M-1))X(YsY(M-1)) THEN 2558 
PSET(X(M-1), Y CM-1) , CP (M-1)) : MxM—1: RETURN 
FSET (X(M-1),Y(M—1),CC) : M-M-1: RETURN 
IF M= THEN RETURN 
FOR ї=М-1 TO 1 STEF -і 
FSET (X(D,YOD,CP(CD) 
NEXT 
М=0: RETURN 
GOSUB 1z98:GO0SUB 1200: 50508 1419 
INFUT "жіолума? (2-87) =", ММФ 
IF LEN(NM$)Zz2 OR LEN(NM$)78 THEN 4020 
PT-1:NMi$z"":TLi$z"":DM$-"O8" 
FOR I=1 TO LEN(NM$) 
A$=MID$(NM$, I, 1) 
IF ASC(A$) <48 OR ASC(A$) 555 THEN RETURN 
NM1$-NMi$-MID$(NM$,LEN((NM$)-I-1,1) 
NEXT 
NMŁ=LEFT$(STRING$ (4, NM$),8) 
NM1$-LEFT$(STRING$(4,NM1$),8) 
FOR I-1 TO 8 
ММФ (1—1) =МІРФ (ММФ, І, 1)+MID$ (NM1$, I, 1) 
МЕХТ 
EL = 日 : BL 1 = 日 : RD-8: Кр1=0: GR-0: GR1-0 
FOR I-1 TO 8 
TsVAL (MID$(NMS$, I, 12): T12VAL (MTD ま (NM1 ま 。 I, 12) 
GREGRX2-(T AND 4)/4: GRISGRiXZ2-(T1 AND 4) /4 
RD-RDX2-(T AND 2)/2:RDi-RDiX2-(Ti AND 2)/2 
EL-BLXZ-(T AND 1):BLi-ELi1X2-(T1 AND 1) 
NEXT 
BEL =RIEHT ま (DM ま +HEX ま (EL ) , 2) 
BL1$-RIGHT$(DM£$-HEX$(BL1),2) 


や ーー デー seit *Tuaudgusg や の ポット テー デーーー デ ーーーーーーー デ ーーー 
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4248 
4250 
4268 
7 
4288 
4290 
42089 
4318 
4229 
аза 
4249 
4298 
4260 
45708 
42809 
4290 
44880 
4418 
4428 
44x 
4448 
4428 
4458 
4470 
4488 
4498 
450809 
4518 
45:28 
4929 
4548 
4598 
4360 
4578 
4588 
45909 
46808 
4618 
4628 
4638 
46480 
4650 
4668 
4670 
4688 
4598 
4708 


RD$=RIGHT$ (ОМФ+НЕХФ (RD), 2) 

RD1I$=RIGHT$ (DM$+HEX$(RD1), 2) 

GR$=RIGHT$ (DM$+HEXE (GR), 2) 

GR1$=RIGHT$ (DM$+HEX$(GR1), 2) 

TL $*$=EËL$+RD$+GFR$+EL J $+FRD1$+5R18 

FOR 2-8 TO 7 
Bl. 280: RD«8: GR-G 
FOR I=1 TO 2 

T=VAL (MIDE (ММФ (J) , I, 12) 
GR=GRX2+(T AND 4) /4 
RD-RDXZ-(T AND 2)/2 
BL-BLX2-(T AND 1) 
NEXT 
BL-BLX*85: RD-RDX85: GRzGRXES 
BL ま (J) -RIGHT$ (ОМФ+НЕХФ (BL) ,2) 
RD$(J)-RIGHT$(DM£-HEX$ (RD) , 2) 
GR$ GI) -RIGHT$ (CDM$-HEX& (GR) ,2) 
TL 1$=TL1$+BL#$(J)+RD$ (J) +GR$ (J) 

NEXT 

CLS:CGEN 1:BLO$="":RDO$="": GRO$="" 

FOR I-1 TO 4 
BLGO£$-BLOS-EL $-EL 1$: RDG$-RDOS-RDS-RDi$ 
GROS$-GROS-GRS-GRIS$ 

NEXT 

BL2$-"":RD2$-""i:6R2$-"" 

FOR І-8 TO 7 
BL2$-BLZ2$-EL + (I) 

RD2$-RD2$-«-RD$ (I) 
GR2$-G6R2$4G6R$ (I) 

NEXT 

АФ=НЕХСНЕФ (BL8$) -HEXCHR$ (RDO$) +НЕХСНЕФ (GRO$) 

DEF CHR$(Z8)-4$ 

АФ=НЕХСНЕФ (BL2$) +НЕХСНЕФ (RD2$) -HEXCHR$ (GR2$) 

DEF CHR$(I1)-4$ 

CGEN 1: РКІМТ: РКІМТ #9, СНКФ (36); CHR$ (Z8); 

FRTNT #0, СНЕФ (Z8); HR$(X8);::CGEN B:GOTO 4620 

CGEN 1:РКІМТІРКІМТ S8,CHR$(CI1): CHR 下 (1) { 

PRINT &8,CHR$ (I1): HR$(Z1)::CGEN Ө 

PRINT " DE ? (Y / N) ":CHR$(5); 

TES-SINKEY$(1):1F TE$-"Y" THEN 4668 

IF TK$-"N" THEN 4888 

FT=ーFT: TF PT>@ THEN 4588 ELSE 4688 

IF РТ<8 THEN 4690 

FAINT (X,YO),.HEXCHR$(TL$),1,2,2,4,5,6,7 

CCsSPOINT(X, Y) : RETURN 


FAINT (X,Y),HEXCHR$ (TL1$),1,2,2,4,5,6,7 
CC=FDINT(X, Y) : RETURN 
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38088 
28018 
30298 
3838 
38498 
5050 
3068 
5878 
3088 
5898 
31808 
5118 
3128 
3138 
5148 
5150 
5168 
8170 
68088 
608109 
68028 
68038 
68048 
6050 
68609 
6078 
68088 
68098 
618089 
6118 
6120 
6130 
6148 
6158 
6168 
6178 
61898 
6198 
6288 
6218 
6228 
6238 
6248 
6298 
6260 
6278 
6288 


ニー ニー ニーーーー ニ ー з Ау ロート" 。 ee etae teneris 
GOSUE 1420: РКІМТ"С LOAD 1" 
INFUT" FILE NAME ? (^'/"'-RETURND ",T$ 


IF LEN(T$) >16 THEN 5888 
IF T$-"/" THEN RETURN 
GOSUB 5898 
FOR I-8 TO 7 
FALET I,FAL (I) 
NEXT:RETURN 
OFTION SCREEN 2:PRMW &HFF 
OPEN"I",1,T$:REC-8:GOSUE 2140 
IF (WIs480)X(SC-1) THEN REC=4 
AS-INFUT$(128,1):BES-INFUTS$(128,1) 
DEVO$" MEM: ", REC, A$, B$: REC=REC+1 
IF МІ-88 THEN 5168 
IF (REC MOD 8)-4X(1-SC) THEN REC=REC+4 
IF RECS&HC THEN 5128 
CLOSE #1:FRM Ө: ІМІТ: ОЕТІОМ SCREEN 1:С1.5: RETURN 
ッ ーーーーーーーーーー ЛУ, 2 Те“ ニニ ニー ニーー ニ ーー ニー ニー ニー の mm ニー 
FRWBO:CONSOLE 8,22:CLS:G085UB 1450: 50508 1590 
GOSUB 1420:FRINT"L SAVE 1" 
INFUT" FILE NAME で ('/^sRETURN) ",T$ 
IF LEN(T$) >15 THEN 5898 
IF Т%="/" THEN RETURN 
OFTION SCREEN 2:PRW £&HFF 
OFEN"O",1,T$:REC-0:GOSUE 62580 
IF (ИІ=49) ж (5С=1) THEN REC=4 
DEVIS$"MEM:",REC,A$,E$:PRINT41,0£$; B$: : REC-REC-1 
IF WIs880 THEN 6128 
IF (REC MOD 8)-4X(1-8C) THEN REC=REC+4 
IFREC«&HCBO THEN 5898 
GOTO 5178 
INPUT #1,WI2 
IF WI2=WI THEN 6178 
GOSUB 5170:GOTO 62808 
FOR I-8 TO 7 
INFUT #1,РА (I) 
NEXT: RETURN 
GOSUB 1420 
FRINT"WIDTH MISS MATCH !! (Fush Any key) "; 
FEY ま =INEEY ま (1 ) 
IF KY$="" THEN 6208 
RETURN 5888 
PRINT 41,UI 
FOR I-8 TO 7 
FRINT #1,РА (I) 
NEXT: RETURN 
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7888 
7818 
7828 
7838 
78460 
7858 
7868 
78078 
7888 
7898 
7188 
9880 
9818 
9028 
ваза 
98048 
9058 
986 
9078 
o888 
98098 
91808 
9118 
9128 
9138 
92148 
9158 
916 
9178 
9188 
9198 
92288 
9218 
25808 
9518 
9520 
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:---------- カー ソル キー 2 Фу92 ----------------- 
CLS4: WIDTHAB:CSIZE 2 

COLOR S:LOCATE 4,4 :FRINT 48 "CHOOSE NUMBER !!" 
COLOR Z:LOCATE 6,8 :FRINT #8 "1. KEY BOARD"; 
COLOR 4:LOCATE 6,12:FRINT 488 "2. JOYSTICK 1"; 
COLOR 6:LOCATE 6,15:PRINT #0 "2. JOYSTICK 2"; 


CSIZE В: CFLASH 1 

LOCATE 4,20: INFUT "Fush Any Key !! "£:JST$ 

IF (JST$z"1")-(JST$-"2")-(JST$z"z3") THEN 7100 
GOTO 78078 

JST= VAL (GIST$)—-1: CFLASH Ө: RETURN 

?一 一 一 一 一 一 一 一 一 一 エラ ー за!) 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 
CONSOLE : КИВ 


IF (ERR-SZOÓOX(ERL-318080) THEN 9180 

IF (ERRZSZ)X(CERL-60780) THEN 9118 

IF (ERR-72)X(ERL-—-60780) THEN 9128 

IF (ERR-73)0X((CERL-60780) THEN 9138 

IF ERR=73 THEM GOSUR 9218: RESUME 

GÜSUE 5$31780:FRINT ERR, ERL 

FRINT"If you want to go on, Fush "FS" Key" 
STOF 

GOSUE 91480:RESUME 5080809 

GOSUB 9?148:RESUME 6888 

GOSUE 92890: RESUME 5090 

GOSUB 9210:RESUME 400A 

BUHSUB 12Z98:FILES 

FRINT:FRINT"Fush Any Key !! (^SF'-FILES) "5 
EY$=INEEY$(1) 

IFKY$=" "THEN FRINT:FILES:GOTO91598 

IF KY$z""THEM 9150 

RETURN 

GOSUE 1290:PFRINT"Write Frotected !''":60TO 9150 
GOSUB 1x980:FRINT"Device Offline !!" :GOTO 9150 
P -一 -一 一 一 一 一 一 一 一 2 тті ; ту? 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 
DATA BLACE, BLUE, RED MAGENTA 

DATA GREEN, CYAN, YELLOW, WHITE 
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ee 


. 


| 次 元 デザ イン ツー ル の 製作 


3 次 元 図形 の 表現 方 法 に は , 「 面 」「 線 」 そ れ に 「 曲 」「 平 」 の 4 通り の 方 法 が 存在 し ます ( 表 3 一 1)。 
これ ら の 中 で , どの デー タ 構 造 を 選択 する か は , その 出力 装置 の 方 法 に よっ て 異な り ま す 。 マ ッ ピ ン 
グ や レイ トレ ー シ ン グ 等 を 行う 場合 は , 図形 の 面 デ ー タ を 必要 と し ます が , 単純 に XY プロ ッ タ 等 
の ペン で 出力 する 場合 は , 線 デ ー タ の ほう が よい と いえ ます 。 

と こと で は , 3 次元 図形 を ワイ ヤー フレ ー ム (一 部 サー フェ イス ・ モ デル ) で 表現 し ます 。 


一 ca 


物体 を 記述 する 方 法 の 最も 簡単 な も の は , 座標 デー タ の み を 順番 に 格納 し て 描か せる と いう , 単純 
配列 型 デ ー タ 構造 と いえ ます 。 こ の 方 法 は , デー タ 構 造 が 簡単 で , 必要 と する 記憶 容量 も 少な く て す 
Z, 理解 も 早い の で す が , 一 度 入 れ た デー タ の 削除 や 挿入 に 時 間 を 要する と いう 欠点 が あり ます 。 
ここ で は , 階層 配列 型 の デー タ 構 造 を と る こと に し ます 。 こ れ は , 立体 は 平面 に よっ て 構成 され , 
平面 は 陵 線 に よっ て 囲ま れ , 陵 線 は 点 に よっ て 与え られ て いる と い ? 構 造 で す ( 図 3 一 1)。 第 1 章 の 
形状 モデ リン グ で 解説 し た 直方 体 を 眺め て よく 理解 し て くだ さい 。 


> 


ev へ SS 2 


cd 


“A 
V 


3 一 | 3 次 元 図形 の 表示 方 法 (階層 配列 型 デ ー タ 構造 ) 
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| 次元 デ ザ サイン ツー ル ・ プ ログ ラム 


この プロ グラ ム を 入力 し て 実行 (RUN) する と , 図 3 一 2 の よう に , 画面 上 に メイ ン メ ニュ ー 表 示 
と , その コマ ンド 表示 , それ に , 図形 を 記録 し て いる ワー ルド 座標 系 の スク リー ン 座 標 か ら 見 た 座標 
軸 を 表示 する ワー ルド 座標 軸 表 示 が 現れ ます 。 メ イン メニ ュー 表示 に 従っ て それ ぞ れ の コマ ンド を 説 
明 し ます 。 


| PRODUCT Í 


PRODUCT 命令 は , ワイ ヤー フレ ー ム ・ モ デル (一 部 サー フェ イス ・ モ デル の デー タ 構 造 を し て 
いる ) を 作成 する た め の コ マン ド 和 群 で す 。 


С 3D-TOOL МАІМ MENU ] 


. PRODUCT 
. DISPLAY 
. LORD 


. SAVE 
. NORMAL END 


ワー ルド 座標 軸 表 示 


3—2 
メイ ン ・ Push Key (1 - 5) Bl 
メニ ュー 表示 


m. 


mn. 


面 で 構成 され る 
自由 な 立体 
type A 


図 3 一 3 3 次 元 シ ステ ム の 図形 記述 モデ ル の 種類 


実際 に 描く こと の で きる 図形 は 大 別して , 面 で 構成 され る 自由 立体 (type А) と , 円 柱 , Ф, Ж 
Ж, 回 転 体 と いっ た 登録 され た 形状 記述 の 行え る 図形 (type B) の 2 つ に 分 か れ て いま す (013-3), 

type A, B それ ぞ れ に よっ て 入力 手順 が 2 種 に 分 か れ ま す 。 

メイ ン メ ニュ ー か ら , 1. PRODUCT を 選び ます ([1] を キー 入力 し ます )。 す る と サブ メニ ュー と 
Б, 


POINT 

PLANE 

MANY P. 
TRANSFORMATION 
EXIT 


т + Ç N = 


が 表示 され ます 。 こ れ か ら 先 は それ ぞ れ の サブ メニ ュー 命令 を 解説 し な が ら , 図形 記述 を 行っ て いき 
ます 。 先 の デー タ 構 造 で の 説明 の よう に , この 3 次元 図形 処理 プロ グラ ム は , サー フェ イス ・ モ デル 
の デー タ 構 造 を 持た せ て いま す 。 そ の 内 容 記 述 の 構造 に 関し て は 解説 済み で す の で , ここ で は 実際 に 
図形 を 記述 する 方 法 に つい て 解説 し ます 。 


POINT は , type A の よう な 自由 立体 を 作成 
| PNE D する 場合 の POINT (д) デー タ を コン ピュ ー タ 
タメ モリ ー 上 に 記憶 させ る た め の コ マン ド で す 。 1 辺 が 100 の 立方 体 を 作成 する 方 法 に つい て 解説 を 
進め ます 。 立 方 体 の 角 の 各 点 の 座標 値 は 。 ワー ルド 座標 系 の 原点 に 図 3 一 4 の よう に 記述 する と , < 
れ ぞ れ 表 3 一 2 の よう な 座標 値 を 得る こと が で きま す 。 サ プ ブ メニュー 表示 か ら [1] を キー 入力 する と, 


(POINT) 
«POINT Мо. 


と , 点 の 番号 を 聞い て くる の で , 順次 , と 入力 する と , サブ メニ ュー 表示 欄 に , 


<POINT No.1> 
X= 0 
Y= 0 
z= 0 


と 表示 され , ポイ ント ① の X, Y, Z の 座標 値 を 聞い て きま す 。 図 3 一 4 の 表 か ら ポ イン ト ① は , X2: 
0, Y が 0, Z が 0 で すか ら , その まま [0lCRI|, [OCR], [0ICR| と 入力 し ます 。 
kE, ポイ ント ② の 座標 値 は 。 (100 0, 0) で すか ら , PCR] Lx, 


«POINT Мо. 2» 
Х- 0 
Y= 0 


2= 0 


Т0 


第 3 章 3 次 元 図形 処理 技術 入門 


3 一 4 ワー ルド 座標 系 で の 点 に よっ て 記述 し た 立方 体 
の それ ぞ れ の 座標 値 を , 110І0Іск), OCR], [01ICR] と 入力 し て くだ さい 。 以下, この よう に し 


T, ポイ ント か ら ⑧ ま で 入力 を 終え た ら , [EICR] を 入力 し て くだ さい 。 こ と れ で コン ピュ ー タ ・ メ モ 
リー 上 に , ポイ ント 座標 値 が 記憶 され た こと に な り ま す 。 画面 表示 は 。 サブ メニ ュー に 戻り ます 。 次 
いで , PLANE の 座標 記述 に 移り ます 。 
PLANE は , POINT 命令 で 登録 し た デー タ 

する た め の も の で す 。PLANE は , 変数 BHP と し て DIM に ある よう に , 50 ポ イン ト ま で の 点 群 に 
よっ て 記述 する こと が 可能 で す 。 先 ほど の 1 辺 が 100 の 立方 体 を 例 に と っ て , PLANE 番号 を わか り 
や すく する た め に た 図 3 一 6 の よう に 決め て お く と , それ ぞ れ の 面 を 構成 する ポイ ント ・ ナ ン バ ー と し て 
同 図 の 表 が 得 ら れ ま す 。 

これ ら の 面 デ ー タ を 入力 し て いく と と に し ます 。〔PRODUCT〕 の サブ メニ ュー 表示 か ら [2] を 選 
ぶ と , 


(PLANE) 
«PLANE No. 


と , PLANE (@ の 名 前 を 聞い て きま す 。 表 に 従っ て [1[CR] を 入力 する と , 


© 


同一 平面 内 の 3 点 に よる 面 記述 同一 平面 内 の 4 点 に よる 面 記述 同一 平面 内 の 6 点 に よる 面 記述 


3 一 5 PLANE 記 述 例 
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立体 を 構成 する それ ぞ れ の 面 を 構成 
する 点 の 番号 


3 一 6 立方 体 を 構成 する 面 


«PLANE No.1> 
(1) 
Point number (0=RETURN) = 0 


と 開い て きま す 。 坦 の 面 を 構成 する ボイン ト 番 号 は 。①, Q, ③④ で すか ら , (ск), [2ICRI 
[3ICR], [4IICR] を 入力 し ます 。 そ し て 最後 に , その まま (0 表示 され て いる ) [CR] を 入力 する と, 
スク リー ン 座 標 上 に , PLANE① の 四角 形 が 表示 され , (PLANE №.) 上 で カー ソル が 点滅 し て い 
る 状態 に な り ま す 。 同様 に し て , PLANE Ө, Ө, Ө, Ө, ⑨ の 各 面 の ポイ ント 番号 を 入力 し ます 。 
全部 の 入力 が 終え た ら , [EICR] を 入力 し て , (PRODUCT) の サブ メニ ュー 表示 に 戻っ て くだ さい 。 

これ で , 立方 体 の PLANE 情報 の 入力 は 完了 し た わけ で す 。 いよいよ, サー フェ イス ・ モ デル の 
記述 を 完了 する た め に , <3. MANY P» を 選択 し ます 。 

MANY P 命 令 は , PLANE 命 令 で 記述 し た 

L МАМҮР J 面 情報 を , 立体 と し て 組み 立て る た め の も の で す 。 
現在 まで 記述 し て いる 立方 体 の 。 <MANY P No» を [と する と , この 物体 は , ШӨ, Ө, Ө, 
Ө © お よび で 構成 され て いま す 。 今 まで の も の と 同様 に , 


«MANY P No. 


と 表示 され て いる 状態 で [1 [CR| を 入力 する と , 


(1) 
Plane number (0=RETURN) = 0 


と 表示 され ます 。 と こと こ で , と 入力 する と , 画面 上 に PLANE ⑲ が 表示 され , 


(2) 
Plane number (0=RETURN) = 0 


の よう に 変わ り ま す 。 
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次 いで [2[CR], [3[СЕ], ACR], 51СЕ), [6ICRI と 順次 入力 し た 後 , [0ICR] で <MANY Р 
No» 入力 の と と ろ に 戻り , 恨 [CR] を 入力 する と , type A の 例 と し て の 1 辺 が 100 の 立方 体 の 入力 


が 完了 し た こと に な る わけ で す 。 
TRANSFORMATION は , 作り あげ た 3 次 
|_THANSFOHMATIDN |ЖАНА АЫ 


上 ) に 登録 する た め の も の で す 。 登録 する 物体 と し て , 変数 ATR で 10 個 の 配列 を と っ て いま す 。 
(PRODUCT) の サブ メニ ュー 表示 か ら [4] を 選択 する と, 


N 


(TRANSFORMATION) 
<TRANSFORMATION No. 


と 開い て くる の で , Ж Мо. (10 個 まで ) を 入力 し ます 。 こ こ で , この 場合 は 最初 の (1 辺 が 100 の 
立方 体 と し て ) [1ICR| を 入力 する と , 


[TRANSFORMATION] 
MANY P 
SPHERE 
CYLINDER 

CONE 

ROTATION 
DELETE 

EXIT 


"Oo GQ B» C м н 


と 表示 され て 入力 待ち と な り ま す 。 
1. MANY P 

type A の 代表 で ある 1 辺 が 100 の 立方 体 を ワー ルド 座標 系 に 登録 し て み ま す 。 こ の 場合 は 。 1. 
MANY P で すか ら , [を 入力 する と , 


(TRANS MANY P) 
MANY P NUMBER - 


と 聞い て きま す 。 前項 <3. MANY P» で この 立方 体 を [1] と し て 登録 し て いる の で , [1l[CRI を 入 
ЖЫЛТ, 
画面 表示 は 次 に , 


| COLOR(1—7) = | 


と 聞い て きま す 。 こ こ で , 表示 し た い 色 番号 (=F, 2 三 赤 , 3 ニン シアン, 4 ニ グ リー ン , 5 ニシ アン , 
6 ニ イ エ ロー, Т-Н) を 入力 する と , 次 の よう に 聞い て きま す 。 


j TRANS SCALE X = | 


これ は , すでに 記述 し た 立方 体 の うち , 双方 向 の スケ ー ル を 何 倍 に 書き 直せ ば いい の か を 尋ね て い 
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る も の で , 従来 どおり の スケ ー ル だ と [1l[CRI それ より も 倍率 を 大 きく 表示 し た けれ ば 1 以上 の 数 
値 を , 縮小 する に は 1 以下 の 数 値 を 入力 し て くだ さい 。 
双方 向 の スケ ー ル の 入力 が 終わ る と , 


TRANS SCALE Y = 


続い て , 


TRANS SCALE Z = | 


と 聞い て くる の で , それ ぞ れ Y 方 向 と Z 方 向 の スケ ー ル を 何 倍 か に 指定 し て くだ さい 。 

例え ば , TRANS SCALE ofü*, Х-2, Ү-0.5, Z ニ 1.5 と する と , 1 辺 が 100 の 立方 体 は , 
図 3 一 7 の よう に , 200(X 辺 の 長 さ )X50(Y 辺 の 長 さ ) メ 150(Z 辺 の 長 さ ) と な り ま す 。 

記述 図形 の 変換 後 の 図形 が 決ま る と , 次 の よう に 聞い て きま す 。 


| TRANS ROTATE X = | 


これ は , 又 軸 の まわ り に 何 度 回 転 す る か を 入力 する も の で , 回 転 の 向き は , 図 3 一 8 の よう に XX 軸 
の 前 進 する 方 向 に 対し て 右 ネ ジ の 回 転 を 正 と し ます 。 同様 に し て , Y 軸 お よび Z 軸 に 対し て も 入力 し 
ます 。 

こと の 例 で は , 例え ば , Х-30, Y=20, Z=0 と する と , 図 3 一 9 の よら うに, X, Y, Z 軸 に そ 
れ ぞ れ 30 度 , 20 度 , 30 度 回 転 し て 得 ら れ た 図形 が 記述 され る こと と な り ま す 。 


TRANS SCALE Х=2 
ーー 


7А 


TRANS SCALE Ү=0.5 


それ ぞ れ 1 を 入力 する と | 
無 変換 3 


3 一 7 TRANS SCALE に よる 図形 変換 の 例 
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次 いで , 


| TRANS MOVE X = 


と , 聞い て きま す 。 こ れ は , 指定 し た 位置 (原点 (0, 0 0) か ら の 双方 向 の 移動 量 を 入力 する も 
DT, Үй, Z 軸 に 関し て も 同様 の 指示 を れ し ま す 。 

これ ら の 指示 を 完了 し する と , ワー ルド 座標 系 に 実際 に 図形 を 記述 し た こと に な り ま す 。 同様 の 
MANY P を , 別 の TRANS で 記述 する こと が 可能 で す (最大 10 個 まで 指定 で きま す )。 

1 辺 が 100 の 立方 体 を 例 に と っ て , 面 で 構成 され る 自由 立体 (type А) に つい て の 記述 方 式 た に つい 
て 話 を 進め て きま し た 。 TRANS に よる ワー ルド 座標 系 へ の 図形 記述 は 。 この ほか に ワイ ヤー フレ 


回 転 の 正方 向 は 手前 か ら 奥 に 
向け て 右 ま わり ( 右 ね じ を 前 


へ 進め る 方 向 ) 


図 3 一 8 回 転 の 正方 向 


TRANS ROTATE Х--30 
ーー 


TRANS ROTATE Y —20 


3 一 9 TRANS ROTATE の 例 
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画面 中 央 が 
原点 位置 (0, 0) 


TRANS MOVE 
を 指定 する と 
— 


通常 は , 画面 中 央 に 表示 され る X, Y, ZZ それぞれ の 方 向 に 指示 量 だ け 
移動 し て 表示 され る 


13—10 スク リー ン 画 面 の 原点 座標 軸 
ー ム ・ モ デル の デー タ 構 造 を 持つ SPHERE (Ж), CYLINDER (円 柱 ) CONE (M$), 
ROTATION (回 転 体 ) に 代表 され る type B(69 ペー ジ , 図 3 一 3) に つい て も 行う こと が で きま 
す 。 
2. SPHEER (球体 ) 

(TRANSFORMATION) の メニ = ュー で [2] を 入力 する と , 球体 を 記述 する こと が で きま す 。 球 
体 の 場合 は , 


RADIUS = 


と 聞い て くる の で , 球体 の 半径 を 入力 し て くだ さい 。 
次 いで , 


COLOR(1—7) = 
TRANS SCALE X 
TRANS SCALE Y 
TRANS SCALE Z 
TRANS ROTATE X 
TRANS ROTATE Y 
TRANS ROTATE Z 
TRANS MOVE X = 
TRANS MOVE Y = 
TRANS MOVE Z = 


と 聞い て くる の で , 41. MANY P» の 場合 と 同様 の 考え 方 で , 必要 な デー タ を 入力 し て くだ さい 。 
た だ し , この うち , TRANS SCALE ОХ, Y, ク に それ ぞ れ 異な る 倍率 を 入力 する と , 球体 が 
ラグ ビー ボー ル 状 に 変形 する の で 注意 し て くだ さい 。 
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RADIUS 


шә 


83-І! 球体 表現 の 数 値 

3. CYLINDER (円 柱 ) 
(TRANSFORMATION) х = = ー で [3] を 入力 する と , 円 柱 を 記述 する こと が で きま す 。 
最初 に , 


| RADIUS = | 


と 聞い て くる の で , 円 柱 の 半径 を 入力 し て くだ さい 。 
次 いで , 


| HEIGHT = | 


と 聞い て くる の で , 高 さ を 入力 し て くだ さい 。 
あと は , 他 と 同様 に ,。 COLOR, TRANS SCALE, TRANS ROTATE, TRANS MOVE の 順 で それ ぞ 
れ の 値 を 入力 すれ ば , 目的 の 円 柱 を 記述 する こと が で きま す 。 


RADIUS 


HEIGHT 


3—12 円 柱 表現 の 数 値 
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UPPER RADIUS 


ай. 


HEIGHT 


LOWER RADIUS 


3—13 PIGH 

4. CONE (БН 
[TRANSFORMATION〕 メ = ュー で [4] を 入力 する と, 円 雛 を 記述 する こと が で きま す 。 
FEDRE b, 最初 に 基本 形 の デー タ 入 力 を 求め て , 


| UPPER RADIUS = | 


と 聞い て くる の で , 円 名 の 上 底 の 半径 を 入力 し て くだ さい 。 上 底 は 原点 の 高 さ に な り ま す 。 さ ら に , 


LOWER RADIUS = | 


と 聞い て くる の で , 円 氏 の 下 底 の 半径 を 入力 し て くだ さい 。 
次 いで , 


| HEIGHT = | 


と 聞い て くる の で , 高 さ の 値 を 入力 し ます 。 あ と は SPHERE や CYLINDER の 場合 と 同様 の デー 
タ 入 力 と な り ま す 。 
5. ROTATION (回 転 体 ) 
TRANSFORMATION〕 メ = ュー で [5] を 入力 する と , 回 転 体 を 記述 する こと と が で きま す 。 
TT, 


(1) 
HEIGHT (E=EXIT) = 


と 聞い て くる の で , 中 心 点 か ら の (1) の 点 の 高 さ を 入 力 し て くだ さい 。 
次 いで , 


RADIUS = 


と 聞い て くる の で , その 点 の 半径 を 入力 し て くだ さい 。 そ うす る と , (1) が (2) に 切り 替わり , 同様 の 
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RADIUS 


10 20 30 40 


[3—14 回 転 体 表 現 の 例 
質問 が 繰り 返さ れる の で , 最大 30 個 まで の 点 を 順次 入力 し て くだ さい 。 

必要 点 の 入力 が 終わ り 傾 [CR] を 入力 する と , これ まで の も の と 同様 に , 順次 , COLOR 以降 の 入 
データ を 求め て くる の で , 必要 デー タ を 入力 し て くだ さい 。 

すべ て の 記述 が 終わ れ ば , 次 の TRANS に よる 図形 デー タ の 入力 を 求め て きま す が , 終了 の 場合 
は [EICR] を 入力 する と , (PRODUCT) の サブ メニ ュー に 復帰 し ます 。 


6. DELETE (消去 ) 
(TRANSFORMATION) メニ ュー で [6|] を 入力 する と , 入力 し た 図形 モデ ル を 消去 で きま す 。 


| TRANS No. | 


と 聞い て くる の で , 消去 し た い 図形 モデ ル の 番号 を 入力 し て くだ さい 。 デ ー タ が 完全 に 消去 され て , 
CTRANSFORMATION] の メニ ュー に 戻り ます 。 
7. EXIT 

[TRANSFORMATION] メニ ュー の [7| で , (PRODUCT) の サブ メニ ュー に 復帰 し ます 。 


(PRODUCT) の サブ メニ ュー で [5] を 入力 す 
| ки] di. qvae def 
| DISPLAY | 


メイ ン メ ニュ ー で DISPLAY 命令 は , PRODUCT 命令 に よっ て , ワー ルド 座標 系 に 記述 し た ワ 
イヤ ー フ レー ム ・ モ デル や サー フェ イス ・ モ デル を , スク リー ン 座 標 系 で いろ いろ と 変形 し て みよ 5 
と いら も の で す 。DISPLAY 命令 に 入る と , サブ メニ ュー と し て , KO 4 つが 表示 され ます 。 


NEW 
CONDITION 
WIRE FRAME 
EXIT 


+ оо Nme 
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これ ら は , すべ て ワー ルド 座標 系 に 描か れ た 図形 モデ ル を , 何ら か の 形 で 見 る た め の も の で す 。 そ 
れ ぞ れ の 命令 に つい て 説明 を し て いき まし ょ 5% 


| м. о. з” 
よう に 聞い て きま す 。 
SCREEN CLEAR (Y/N)? 


これ は , 他 の 命令 に よっ て 描か れ た 画面 上 の スク リー ン 座 標 系 に 描か れ た モデ ル を 消す か どう か 聞 
いて いる の で す 。 消す 場合 は [YI」 その まま の 場合 は INI キ ー を 入力 する と , DISPLAY メニ ュー に 
復帰 し ます 。 


[2| キ ー を 入力 し て CONDITION 命令 を 選ぶ 
| CONDITION | と , まず , 次 の よう に 聞い て きま す 。 


(SCREEN CONDITION) 
PERSE TRANS (Ү/М) ? 


透視 変換 する 場合 は 区], し な い 場 合 は [NN と キー 入力 し ます 。 透視 変換 する 場合 と し て , 区] と キー 
入力 する と , 


T 


と , 方 向 の 消 点 位置 を 尋ね て きま す 。 消 点 位置 は 。 一 の 大 きい 値 を 入力 する と , あま り パ ペース ペ 
クティ ブ プ は か か り ま せん 。 逆 に , 一 の 小さ い 値 を 入力 する と , か か りす ぎ ま す 。 物 に 応じ て 試し て , 
適当 な 値 を 選び 出し て くだ さい 。 

Z 値 を 入力 する と , 


AXIS ROTATION X = | 


と , スク リー ン 座 標 系 の XX 軸 方 向 の 回 転 角 度 を 尋ね て くる の で , 又 軸 方 向 に 正 の 回 転 角 度 を 与え る と , 
図 3 一 15 の よう に 回 転 し て 表示 され ます 。 次いで, 


AXIS ROTATION Y = | 


, と 聞い て くる の で 同様 の 処理 を し ます と , 角度 分 だ け 回 転 し て 見 えま す 。 
物体 を 表示 する 位置 は 次 の 


SCREEN MOVE X 
SCREEN MOVE Y 
SCREEN MOVE Z = 


で 指定 し ます 。 ス クリ ー ン の 動く 方 向 は , 図 3 一 16 の よう に な り ま す 。 
これ ら の 方 向 は , 実際 に 物体 を 動か し て みて , 画面 上 の 位置 関係 を 感覚 的 に つか むこ と が 大 切 だ と 
思わ れ ま す 。 目 で 確か め て 早く 自分 の も の に し て くだ さい 。 
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Y 軸 回 転 ( 正 ) 


ワー ルド 座標 


ru Y 軸 回 転 ( 負 ) 


3—15 スク リー ン 座 標 系 の AXIS ROTATON の 関係 


Z 軸 移 動 


X 軸 移動 


スク リー ン 座 標 


3—16 スク リー ン 座 標 系 の SCREEN MOVE の 関係 
すべ て の 入力 が 完了 する と , (DISPLAY) メニ ュー に 復帰 し ます 。 透視 変換 を し な い 場 合 は 。 ス 
クリ ー ン 座標 系 の AXIS ROTATION 以降 の 命令 を 同様 に 入力 し て くだ さい 。 


3] キ ー を 入力 し て WIRE FRAME 命令 を 選 
| WIRE FRAME l'a 


(WIRE FRAME DISPLAY) 
(TRANS No. 
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と 聞い て くる の で , 表示 する 図形 No. を 入力 し て くだ さい 。 [2] の CORDINATION 命令 で 指定 さ 
れ た スク リー ン の 位置 で , 入力 図形 が 表示 され ます 。 


す 。 
J LOAD | 


メイ ン メ ニュ ー LOAD 命令 は , (4) の SAVE 命令 で ファ イル され た 図形 を 呼び 出す た め の も の で 
%% 


3 次 元 デ ザイ ン ツ ー ル ・ プ ログ ラム の メニ ュー 構造 


面 や 物体 の も と に な っ て いる 点 を 入力 する 。 


点 と 点 を つ な き 合わ せ て 線 や 面 を 作る 。 


3. MANY P| PLANE で 作り 出し た 面 を 合わ せ て 3 次 元 物体 を 作る 。 


ワー ルド 座標 了 索 の 中 で |0 個 まで 登録 で きる 。 


3 次 元 物体 の 回 転 , 拡大 , 移動 を 行う 


球体 の 回 転 , 拡大 , 移動 を 行う 。 


円 柱 の 回 転 , 拡大 , 移動 を 行う 。 


PNE, 拡大 , 移動 を 行う 。 


回 転 体 の 回 転 , 拡大 , 移動 を 行う 。 


5. ROTATION 
6. DELETE 


入力 し た 図形 モデ ル を 消去 する 。 


PRODUCT の サブ メニ ュー に も どる 。 


メイ シメ ニュ ー に も どる 。 


画面 を クリ ア す る 。 


2. DISPLAY 


透視 図法 で 描く か , 登録 され た 図形 の 視点 や 倍率 等 の 変化 を 与え る 。 


2. CONDITION 
3. WIRE FRAME 


SAVE さ れ て いる 図形 を WIRE FRAME で 描き 上 げ る 。 


メイ ン メ ニュ ー に も どる 。 
3. LOAD 外部 記憶 装置 に ファ イル され て いる 図形 を 呼び 出す 。 


4. SAVE 図形 を 外部 記憶 装置 に ファ イル する 。 
NORMAL END 


82 


第 3 章 3 次 元 図形 処理 技術 入門 


(LOAD) 
(LOAD FILE NAME ('E' = ЕХІТ)) = 


と 聞い て くる の で , 呼び 出し た い フ ァイル ネー ム を 入力 し て くだ さい 。 呼 び 出 し が 完了 する と メイ ン 
メニ ュー に 復帰 し ます 。 


ーー 


メイ ン メ ニュ ー で [4] キ ー を 入力 する と , 作成 し た 図形 を SAVE し て お く こ と が で きま す 。 
画面 上 に , 


(SAVE) 
(SAVE FILE NAME ('Е’ = EXIT)) = 


と 表示 され ます の で , 必要 な ファ イル ディ スク リプ タ を 指定 し て 13 文 字 以 内 で ファ イル 名 を 指定 し 
て くだ さい 。 


変数 と その 内 容 。 ーー 
配列 変数 
MD ( ) 。 | 物体 デー タ TR ( ) | 表示 物体 デー タ 
HP ( ) 面 デ ー タ RH( ) 回 転 体高 さ デー タ 
PT( ) 点 デ ー タ | RR( ) E 
Z 
APT 点 デ ー タ の 最大 数 QAX スク リー ン の 移動 ( X 方 向 ) | 
AHP 面 デ ー タ の 最大 数 QAY スク リー ン の 移動 ( Y 方向 ) | 
BHP 1 面 の 点 デ ー タ の 最大 数 | Qaz スク リー ン の 移動 ( Z 方 向 ) 
BBD 1 物体 の 面 デ ー タ の 最大 数 MN 物体 表示 の 変換 の 判定 
物体 デー タ の 最大 数 SS 
スク リー ン 回 転 の 正弦 成分 
表示 デー タ の 最大 数 SF 
回 転 体 の 点 の 最大 数 TS Ши 
— — スク リー ン 回 転 の 余弦 成分 
回 転 角度 の ステ ッ プ 数 
SRX 
スク リー ン 中 央 の 位置 ( X 座 標 ) SRY 物体 の 回 転 の 正弦 成分 
YS スク リー ン 中 央 の 位置 ( Y EE) SRZ 
QRX | スク リー ン の Y 軸 に 対す る 回 転 角 TRX 
ORY スク リー ン の X 一 Z 面 で の 回 転 角 TRY 物体 の 回 転 の 余弦 成分 
PSZ 透視 の 判定 と 視点 の Z 軸 上 の 位置 | TRZ 
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ー ル ・ プ ログ ラム の 流れ 


| テー タ swE | 


RETURN 


デー タ 表 示 ル ー チ ン 
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第 3 章 3 次 元 図形 処理 技術 入門 


次 元 デ リ イ ノン ソ ツール ・ フロ グン ラム リス ト 


= 


* ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ 


CE : * 
XoxX хр -TOOL < WIRE FRAME ) x 
4 9% * 
= “Ж Frogrammed By Г SAIMU 1 * 
6 "X x 
7 W 1985 . 4 < 1 Ж 
в “ж Ж 
© *ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ 
141 Дан ааа ыы айди D aaa LUN РЬ ченен айын саны 


118 OFTION SCREEN G:WIDTH 80,25,80,2:KLIST G:EMODE B 
12 INIT:DEFINT a-N 

158 AFT-288:AHF-58:BHF-58: BED-5: ABD-Z8: ATR-180: AR-28 
148 DIM MD(BBD,ABD) 。HF (BHF, AHF) , PT (C2, APT) 

158 DIM TR(ATR, 12) , RH CARO , RR CAFO 

168 STP-28:8TF1-18: X82220: Y8-108 

178 QRX--Z8:GRY-Z8:G0SUB 2248 

2080 "ーーーーーーーーーー dal メニ ュー ------------------------ 
218 CLS:CONSOLE 0,25 

228 PRINT" C ZD-TOOL MAIN MENU 21":FRINT 

238 PRINT" 1. FRODUCT":FRINT" 2. DISFLAY" 

2480 FRINT" 2. LOAD":PRINT" 4. SAVE" 

258 PRINT" 5. NORMAL END" 

260 LOCATE 2,24:РКІМТ" Fush Кеу (1 一 5) "; 

278 =VaL(TNEEY ま (1 ) ) 

288 ON A GOSUB Зва, 2800, 60090,7000, 295 

290 GOTO 2808 

295 WIDTH 88,25:1NIT:CLS 4:END 

388 '———— フッ ロダ" ウト ルー チッ -------------------- 
318 GOSUE 8000:CONSOLE 8,25:CL8 

528 PRINT" [L PRODUCT 1":PRINT:FRINT" 1. POINT" 

558 PRINT" 2. PLANE":PRINT" 2. MANY Р" 

548 FRINT" 4. TRANSFORMATION":FRINT" 5. EXIT" 

350 LOCATE 2,253:РКІМТ" Select Number"; 

368 A-VAL (ІМКЕҮФ (1)) 

578 ON А GOSUE 400, 200,800, 1000, 390 

388 GOTO 310 

598 RETURN 280 

ABB *--=-=------ ホホ "ゴット つづ? ロダ "ウト ------------------- 
418 CLS:LOCATE 1,0:PRINT" C POINT 1" 

428 I-8:LOCATE 2,2:1NFUT"ZFOINT No. ",М% 

4380 IF LEFT$(N$,1)-"E" THEN RETURN 

448 N-VAL(ONS):1F Nz-8 OR М>АРТ THEN 420 

458 LOCATE 1,8:PRINT " C POINT 21":FRINT 

468 LOCATE 2,2:PRINT"ZPOINT No.":STR$ (ND; "2"; CHR$ (5) 
478 LOCATE 2,4:FRINT "Xz";PT(B,ND:CHRS$(S) 

ABB LOCATE 2,5:PRINT "Y="; PT(1, № CHRE (5) 
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LOCATE 2,6:FRINT "Z=";PT(2,N):CHR8 (5) 
500 LOCATE 4, 4+1: INFUT "",FT(I,ND 

518 I-I-1:1F 145 THEN 458 ELSE 428 

688 :---------- 2° Laqu つづ" ログ "ウト ———— m m m m m e mme me me m e mee = me 
818 CLS:LOCATE 1,80:FRINT" [ PLANE 1" 

628 I-1:LOCATE 2,2:INFUT"ZFPLANE No. ", № 

558 IF LEFT$(N$,1)-"E" THEN RETURN 

548 N=VAL (N$): IF Nz«8 OR М>АНР THEN 610 

658 LOCATE 2,2:FRINT"ZPLANE No. ";:STR$ (N); ">"; СНЕФ (5) 
66 LOCATE 2,Z:FRINT"("iSTR$(ID i" )"iCHR$(O) 

678 LOCATE 2,4: ЕКІМТ"Роіпё number (G-RETURN) ="; 

688 PRINT HF(I,ND;CHR£(S5) 

598 LOCATE 28,4: INFUT"",N1 

788 IF N1z-«8 THEN 7680 ELSE IF МІ>АРТ THEN 658 

718 HP(I,N)ZN1:IZ2zNi1:MN-8 

728 GOSUE 5888 

738 IF Ізі THEN LINE(X,YO-(X, Y) ,FSET 

748 IF 1<>1 THEN LINE-(X, Y) 

750 I-I*1:1F Іс-ВНР THEN 658 

760 IF 1<=2 THEN HF(8,N)z80:GOTO 628:ELSE НР (9, №) =1-1 


818 CLS:LOCATE 1,0:FRINT" [ MANY F 1" 

820 Ісі: ОСАТЕ 2,2:INFUT"ZzMANY F No. ",N$ 

830 IF LEFT$(N$,1)-"E" THEN RETURN 

840 N-VAL((NS$):1F Nz-8 OR М>ВВЕр THEN 810 

8580 LOCATE 2,2: РКІМТ"< МАМУ Е No."; 

8680 PRINT ТКФ (М) ">": СНЕФ (5) 

870 LOCATE 2,5: РКІМТ" ("5 STR$(1)s" )" 

880 LOCATE 2,4: РКІМТ"Р1 апе number (日 =RETURN) ="; 
898 FRINT МО (N, І) ; СНК (5) 

9860 LOCATE 28,4: ІМЕШТ"", М1 

918 IF Ni1z-z8 THEN 950 ELSE IF N17AHF THEN 850 
928 MD(N,I)-N1:NNi1zNi1:MN-8:GÜSUR 5250 

9x8 І=1+1 

9460 IF IZ-ABD THEN 850 

958 MD(N,8?-I-1:GOTO 828 

1888 “一 一 一 一 一 一 一 一 一 一 ADJ シー ョ ウ ボ ウ ーーー デー ニーー デ ーー テー デーーーー デ ーー 
1818 CLS:CONSOLE 8,25 

1815 LOCATE 1,0:FRINT" C TRANSFORMATION 1" 

1828 LOCATE 2,2: INFUT"ZTRANSFORMATION No. "NT$ 
1025 IF LEFT$(NT$,1)-"E" THEN CLS: RETURN 

1858 NTzVAL(ONT$):IF МТ>АТК OR NTz-G THEN 1888 
18480 CLS:FRINT" [上 TRANSFORMATION 1":FRINT 

1858 FRINT" 1. MANY F  ":FPRINT" 2. SFHERE" 
1860 FRINT" 3. CYLINDER":FRINT" 4. CONE" 

1878 FRINT" 5. ROTATION":FRINT" 6. DELETE" 
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FRINT" 7. EXIT" 
LOCATE 2,24:FRINT" Select Number"; 
AzVAL (INKEY$(1)): CLS 
ОМ à GOSUE 14009, 1500, 1606, 17006,1806, 1170, 1 1 4 日 
GOTO 19808 
TR (NT 。 Ө? = 日 
RETURN 180980 
INFUT " COLOR € 1 = 7) 
IF CLz8 OR nu THEN 1138 
TR ONT, еы J= 
At=" SCALE 
Al$=" X ". 50508 12280: GOSLIE 
АіФ=" Y "GOSUE 12:280: GOSUE 
Al$=" Z = "iGOSLB 12328: 50506 
AS-"ROTATE " 
АіФ=" X "1650508 13280: GOSUE 
Alt$z" Y ": 650808 1220: GOSLUE 
Al$=" Z "sa 60850Е 12280: GOSUE 
АФ: "МОУЕ 
Al$=" X = ":G0SUE 1220: GOSUE 
Ali$-" Y ": 50508 12280: GOSUE 
АіФ=" Z ": 60506 1220:GOSUE 17 
CLS: MN=1: SWAF NT,.N:GOSUR 860 
SWAF NT, N: COLOR? : RETURN 
FRINT" TRANS "АФ; А1% : INPUT" ",X: RETURN 
IF Хс-чӨ THEN X=1 
TRONT, JO =X 154751: RETURN 
7 トラ フン マー メニ ーー gp 
CLS:LOCATE 1,0:FRINT" [ TRANS MANY P 1" 
LOCATE 2,2: INPUT" MANY F NUMBER = ",N 
IF Nz-8 THEN RETURN ELSE IF М>ВЕр THEN 1430 
TRENT, Өзі: TRCONT, 12 =M: БОТО 1158 
Жіз 7 “улт 
DCLS:LOCATE 1,80:FRINT" C TRANS SPHERE 1" 
LOCATE 2,2: INFLUT"RADIUS = ",R 
IF Rz-8 THEN 13518 
TRENT, 9)z2: TRONT, 1) =R: GOTO 11508 
エッ チュ ウ 7 ^o 
CLS:LOCATE 1,0:FRINT" [ TRANS CYLINDER 1" 
LOCATE 2,2: INFUT"READIUS = ",R 
IF RZz-&8 THEN 185-8. 
INFUT" HEIGHT = ",RH:IF RH2 = 日 THEN 16480 
TRENT, gi: TR(NT, 1)-R: TR(ONT, 2) RH: БОТО 1158 
uc 2 ALDY 
CLS:LOCATE 1,0:FRINT" [ TRANS CONE 1" 
LOCATE 2,2: INFUT"UPPER RADIUS = ",Ri1 
IF Ri1z8 THEN 1728 
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1748 INFUT" LOWER RADIUS = ",R2 

1758 IF R2z8 THEN 17480 ELSE IF КічК2 THEN 1648 

17680 INFUT" HEIGHT = ",RH:IF RHz-8 THEN 1768 

1778 TR(ONT,8)-4: TR(ONT, 1) R1: TRONT, 2) =R2 

1788 TR (NT, 3) =RH: GOTO 1158 

1800 “一 一 一 一 一 一 一 一 一 一 カイ テン クイ プー NANA 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 
1818 CLS:LOCATE 1,8:РКІМТ" C TRANS ROTATION 1" 

1820 Ісі:ЕК(8) -«Ө:ЕН(8) = 日 

1858 LOCATE 2,2: РКІМТ" ("{5ТКФ (І) р" ) + 

1848 LOCATE 2,2: РКІМТ"НЕІБНТ (Е=ЕХІТ) ="; 

1858 INFUT"",RHt€ 

1860 IF RH 车 = "Е" THEN 19508 ELSE RH=VRL (RH$) 

18780 LOCATE 2,4:FRINT"RADIUS = "s; 

1888 INFUT"",RR 

1890 IF RRzO THEN 19878 

19868 FR(I)=RR:RH(I)=RH 

19180 I-I-*1 

19280 IF І<АК THEN 1850 

1958 IF I-1THEN RETURN ELSE TR(ONT,G8)-S5: TR(ONT, 1) = エー1 
19480 GOTO 1158 

2000 '"ee————— Ta um Mk ルー チン emeret 
2818 CLS:CONSOLE 8,25 

20280 РКІМТ" С DISFLAY 1":FRINT 

280328 PRINT" 1. NEW":PRINT" 2. CONDITION" 

28480 PRINT" 35. WIRE FRAME":FRINT" 4. EXIT" 

280580 LOCATE 2,24:РКІМТ" Select Number"; 

280680 MVRL(TNEEY ま (1) ) : CL5 

20780 ON А GOSUE 21090,2209, 33800,2090 

28088 COLOR 7:60TO0 2818 

20980 RETURN 288 

SIGD ーーーーー ニ ーーーー の りー ЭУР ご ーーーーーー デ テー デーーーーーーーーー ニ ーーー 
2118 CLS:LOCATE 1,1:РКІМТ" É SCREEN CLEAR 1" 

21280 PRINT" SCREEN CLEAR (Y/N) ? "s 

2150 A$-INKEYS$((10:IF A$="Y" THEN GDSUB 8888: RETURN 
2148 IF А%= "М" THEN RETURN ELSE 2128 

ОРВИ eem mem WU, Tq Sama. デー デー ニー デー デー テーーーーーー デ ーー 
2218 CLS:LOCATE 1,0:FRINT" [ SCREEN CONDITION 1" 
2220 FRINT" PERSE TRANS YIN 7 "; 

2230 A$-INKEYS$(GCOD :CLS 

22480 IF ñ*= "N" THEN FSZ-8:GOTO 2280 

22580 IF АФ "У" THEN 2228 

22680 LOCATE 1,8:FRINT" C SCREEN CONDITION 1" 

2278 INFUT" Z = ",FSGZ:IF FSZ=B THEN 2268 

2288 LOCATE 1s Ө:РКІМТ" C SCREEN CONDITION 1" 

2290 LOCATE 2,2: INFUT"AXIS a cli i X = ",QRX 

2300 INFUT" AXIS ROTATION Y = "QRY 

22318 INFUT" SCREEN MOVE X = ", ВАХ 
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INFUT" SCREEN MOVE Y "QAY 
INFUT" SCREEN MOVE Z "QAZ 
SS=SIN(RAD (ARX) ) : SF-SIN(GRADGORY)) 
TS=COS (RAD (ARX) ) : TFzCOS (RAD (ОКУ) ) 


GOSUB 8000:RETURN 
ワイ ヤー フレーム 27432944 


CLS:LOCATE 1,8:FRINT" Г WIRE FRAME DISFLAY 1" 
LOCATE 2,2: INFPUT"ZTRANS No. ",N$ 
IF МФ-"Е" THEN RETURN 
N=VAL (N$): IF NzzG OR NERTR THEN 3828 
COLOR TFR(N. 4) 
ON TR(N,8) GOTO 2288, 480, 360868, 7800, 4000 
COLOR 7 
A*=" TRANS No":B$="> is miss input " 
C$" !! Push any key !!" 
LOCATE 2,2:РКІМТ АФ: М: ВФ: C$; 
А%=1МКЕҮ% (1): RETURN 
зат- Ор-а Faa bf 
NO=TR (N, 1):N1=MD (NG, B) 
FOR I1-1 TO Ni 
NN1=MD (NB, I1) : 6EDSUR 32598 
NEXT : RETURN 
I2zHF(1,NN1):GOSUB SO0880:LINE (X,Y)—-(OX,YO ,FSET 
FOR J=2 TO HF(8,NN1) 
I2z-HF(J,NN1):GOSUE SOO88:LINE —(X. Y) 
NEXT 
ISzHF(1,NN1):GOSUBE SOBO:LINE ~ (Х,У) : RETURN 
š ロイ ヤー フレ ー ム テディ マフ 9 レイ 2 
R=TR(N。 1) 
FOR Jl= TO 1808 STEF STF 
XOzRXCOS ‹(КАр (31) ) :RizRXSGIN(GRAD(GI12) 
XzXO: Y=R1 』 Z テ 日 
GOSUE SOZO:LINE(OX,Y)-(OX, Y), FSET 
FOR JS= TO 268 STEF STF1 
XzX8: Y-Ri1XCOS((ORAD(G(CIZ2)) 』Z=R1* ま SGIN(RRD (JE)) 
GOSUB SO2O:LINE —(Х,Ү) 
NEXT 
NEXT 
FOR J1=8 TO 188 STEF STF 
Y8=RXCOS(RAD(J1)):R1=RxXSIN(RAD(J1)) 
XzR1:Y-YO:Z-8 
GOSUB SO2O:LINE(OX,.YO-(OX,YO,.FSET 
FOR J2=8 TO 568 STEF STF1 
X-RiXCOS(OXORAD(JI2)):YzYBO:Z-R1XSIN(GEADGI2)) 
GOSUB SOZO:LINE —(X, Y)? 
NEXT 
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3598 
36808 
さら 1 日 
i628 
5658 
3648 
3698 
5668 
3678 
3688 
3698 
37808 
3718 
37208 
5758 
3748 
37598 
5768 
3888 
3818 
i828 
5взе 
i848 
28309 
3868 
3878 
3888 
3899 
29009 
3918 
3928 
5950 
i948 
5950 
3968 
3978 
489 
48018 
4028 
4838 
48048 
48989 
4868 
489078 
48088 
48098 
41808 


MEXT: RETURN 
"mm エーーー ニャ ーー ツー ロイ ヤー フレ ルレ ー ム T"432?|b4 X 
R=TR(N。 12): RHZTRGN, 2) 
FOR 21-8 TO RH ӨТЕР RH/2 
XR: Y-Z2J1:2-0 
GOSUE 5S8280:LINECX,YO-—-CX, Y), FSET 
FOR 12-8 TO 260 STEF STF1 
X-zRXCOS(ORADCIZ)2): Үл2021:2-ЕЖСІМ(КАр(02)29 
GOSUE 5SO2O:LINE —(X,Y) 
NEXT 
NEXT 
FOR J=6 TO 268 STEF STF 
XzRXCOS(CORAD(CJI20 з Y=FH:Z=R£SIN(F AD (J) ) 
GOSUE 5020:X1-zX:Y1-Y 
XzRXCOSOXRADCI)) : YxBz: Z-RXSINGEAD(GI)) 
GOSLUEB 5020: XZzX: Үз-Ү 
LINE €(X1,Y15)—CX24,Y2)0 FSET 
NEXT: RETURN 


*ーーーーーーーーー 一 ロゴ ヤー フルーム テリ イマ フレ ゴイ 4 ----------- 


R1=TR(N。 1) :R2=TR (N, 2) :RH=TR (N, 3) 

FOR 201-8 TO RH STEF RH/2 
R-RZ-(Ri1-R2)X(GRH-ZJ1)/RH 
XsR:Ys2J1:2-8 
GDSUB 5828:LINE(O(,Y)-(X, Y) , PSET 
FOR 12-8 TO 568 STEF STF1 

XsRXCOS(RAD(J2)) : YsZJ1: ZeRXSIN(RAD (ЈР) ) 
GOSUE S5820:LINE -(O,Y) 
NEXT 

NEXT 

FOR 1-8 TO Z68 STEF STF 
X-RiXCOS(RAD (Ј) ) :YsO: ZcRIXSIN(RAD (Ј)) 
GOSUB 5В20: Х1=Х:Ү1=Ү 
XzRZ2XCOS (RAD (J) ) : Ү=КН: ZeR2XSIN(RAD (47) ) 
GOSUB 5020: Х2=Х: YS=Y 
LINE (X1,Y1)-(X2, Y2) , FSET 

NEXT: RETURN 


:---------- ロイ ヤー フレ ー ム "432944 8 ----------- 


FOR J1=1 TO TR(N.1):R=RR(J1) 
YO-RHGI1):YzYO: X=R: Z=0 
GOSUE SO28:LINE(OX,YO)-—-(OX, Y) FSET 
FOR 12-8 TO 568 STEF STF1 
X-RXCOS(RADGCI2)): YzYO: Z-RXSIN(GRADCI2) ) 
БОБОВ 3S828:LINE ~ (Х,У? 
МЕХТ 
МЕХТ 
FOR Ji-8 TO 568 STEF STF 
X=RR (1) XCOS GADGI 12) 2 Y-RH(C1) 
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Z=RR (1) XSIN(RAD(J1)) 
4128 GOSUB 5B2BsLINE(X。Y) う 一 (X。Y) , PSET 
4138 FOR J2=2 TO TR(N,1) 


4148 XzRR (I2) XCOS (RADCJ12) : YRHCI2) 
4158 Z-RR(GIZ)?XSINGRAD(CI12) 
4150 GDSUB 5020:11МЕ – (Х,У) 


4178 МЕХТ 

4188 NEXT: RETURN 

ЗИВ デシ ーー デー ジー テー hugo a ーーーーーーーーーーーーーーーー デ ニーーーーー 
5010 Xz-zFT(8G,IZ2):Y-zPT(1,IZ2):Z-PFT(2,I2) 
58280 IF MN-1 THEN GOSUB 5588 

5030 Х-Х-САХх:ҮтУ-ОПАУ: 2-2-0А2 

840 ХХ-ХЖТЕЯ?ЖӨҒ 

5099 YYzXX*SSXSF-YXTS-ZKSSXTF 

与 日 如 日 ZZ--XXTSXSF-YXSS-ZXTSXTF 

58070 XzXX:YzYY:2-22Z2 

5088 IF FSZ2-8 THEN S188 

50898 PS-1-Z2/FS8Z:X-X/F8: YY/FS 

31880 X-Z2XX-X&G:Y-YS—-Y: RETURN 

ӘСЕ Treme ドラ リズ - ルー ナツ ーーーーーーーーーーーーーーーーーーーーーーー 
5510 К=95: GOSUE 5520: 60508 5628: GOSUBR 5638 
S328 GOSUB 59540: GEHSUE 56508 

SEGBO X=X+TX:Y=Y+TY:Z=Z+TZ:RETLRN 

5546 XA-XXTRYXTRZ*-YX (GRXKXSRYXTRZ*TRXXSRZ) 
S558 XBH2ZXCTRXXSRYXTRZ-SRXXSRZ) 

55608 XX-Xà-XHB 

S378 YOà--XXTRYXSRZ-YX (GRXXSRYXSRZ-TRXXTRZ) 
5588 ҮБ-2Ж (TRXXSRYXSRZ-SRXXTRZ) 

5596 YY=YA+YE 

S600 ZZ-XXSRY-YXSRXXTRY-ZXTRXXTRY 

9510 ХХХ: YzYY: Z-ZZ: RETURN 

5620 XzXXTX:YzYXTY: Z-ZXTZ: RETURN 

S638 TX=TR(N,F) : TYZTR (N, E12: TZ=TR (N, E+2) 
5648 IF K< 8 THEN 3698 

S650 SFRX=SIN(RAD(TX)):SRY=SIN(RAD(TY) ) 
S668 SRZ=STN(RRD(TZ) ) 

3678 TRX-«COS((RAD C X22 : TRYzCOS (КАР (ТҮ) ) 
5688 TRZ-COS(RAD(GCTZ)) 

S698 к=к+Ж:КЕТИЕМ 


6888 '---------- ロー トー ---------------------------- 
6818 CLS:LOCATE 1,80:PRINT" C LOAD 1":10САТЕ 2,2 
6020 INFUT"LLDAD FILE NAME (^E'- EXIT )] = ",T$ 


6858 IF T$-"E" THEN RETURN 
5846 ОРЕМ "I",1,T$ 

69508 FOR I= ТО ATR 

6868 FOR J= TO 1% 
INPUT %1,ТК(І,У) 
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NEXT 
NEXT 
FOR І-Ө TO BBD 
INFUT 41,MD(I,8) 
FOR J=1 TO MD(I,G8) 
INFUT #1,MD(I,J) 
NEXT 
NEXT 
FOR 1-8 TO AHF 
INFUT &1,HP(B,I) 
FOR 1-1 TO HF(8,1) 
INFUT #1,HF (J, I) 
NEXT 
NEXT 
FOR 1-8 TO АРТ 
FOR Je8 TO 2 
INFUT &1,PT(G,I) 
NEXT 
NEXT 
FOR I=B TO AR 
INFUT #1,RR(I),RH(I) 
NEXT 
CLOSE 41:RETURN 
: nuc 
CLS:LOCATE 1,0:PRINT" С SAVE J":LOCATE 2,2 
INFUT"[SAVE FILE NAME (^E'- EXIT 23 = ",T& 
IF T$-"E" THEN RETURN 
OFEN "D0",1,T$ 
FOR I-8 TO ATR 
FOR 1-8 TO 12 
PRINT #1,TR(I,J) 
NEXT 
NEXT 
FOR I=B TO BED 
FRINT &1,MD(I,8) 
FOR J=1 TO MD(I,8) 
PRINT #1,MD(I, J) 
NEXT 
NEXT 
FOR I-8 TO AHF 
PRINT 41,HF(B,I) 
FOR Jei TO HF(8,1) 
PRINT #1,HF(J, 1I) 
NEXT 
NEXT 
FOR I-8 TO AFT 
FOR 4-8 TO 2 
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7248 
7258 
7268 
7278 
7288 
7290 
7388 
8888 
8016 
вата 
3030 
8848 
8050 
8868 
88078 
8888 
9000 
9818 
9820 
9036 
9848 
9850 
9850 
9878 
92888 
9 日 9 日 
92188 
9118 
9128 
91z8 
9148 
9158 
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FRINT S1,FT(J,.ID 
NEXT 
NEXT 
FOR I= TO AR 


PRINT S1,RRCD,RH(CD 
NEXT 
CLOSE #1:RETURN 
:---------- yeaa”? 9 ID ---------------- 
CLS 4:RESTORE 9088 


READ СЦ, Х,У, 2: 560508 88088 

LINE(X,Y) ~ (X, Y) , FSET 

READ X,Y,Z: IF Х--99 THEN COLOR 7:RETURN 
IF X=99 THEN 8828 

GOSUE 8088 

LINE —(X.Y):GOTO 8848 

сынын 58z0:COLOR CL:X-X4260: Y-Y478: RETURN 


ーーーーーーーーーー サド ヒョウ ミツ の 2 7-9 ---------------- 
DATA 1,-8,8,80,-6,0,0,99,99, 99 

DATA 1,-4,08,0,—-2,0,0,99,99,99,1,0,0,0,20,0, 8 
DATA 17,2,0,20,0,0,17,-2,0,99,99,99 

DATA 1,22,2,0,26,-2,0,99,99,99 


БАТА 1,22,-2,80,26,2,0,99,99,99 

DATA 2,08,-8,8,08,-6,08,99,99,99 

DATA 2,0,-4,0,0,-2,0,99,99,99,2,0,0,0,0,20,0 
DATA -2,17,8,0,20,0,2,17,0,99,99, 99 


DATA 2,-2,26,0,8,25,0,2, 260,0, 25,8 

DATA 8,22,0,99,99,99 

DATA 4,0,0,-8,8,0,—65,99,99,99 

DATA 4,0,0,—-4,0,0,-2,99,99,99,4,0,0,0,0,0, 20 
рата 8,2,17,0,0,280,0,-2,17,99,99, 99 

DATA 4,-2,2,24,2,2,24,-2,-2,24 

DATA 2,-2,24,-99,-99,-9%9 
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ee 


図形 記述 の た め の プ リ ミ テ ィ ブ の 設定 | 

マッ ピン ダグ 処理 を 行う た め の 図 形 記述 の プリ ミ テ ィ ブ (基本 形状 ) は 。 次 の 5 タイ プ を 用 意 し て あ 
Dx. 
(1) 球体 (Sphere : 本 書 で は SPHERE) 
(2 円 柱 (circular cylinder: CYLINDER と 略 ) 
(3) m$ (circular cone: CONE と 略 ) 
(4) 
(5) 


4) 直方 体 (rectangular parallelopiped: RECTANGULAR と 略 ) 
5) 回 転 体 (body of rotation: ROTATION 2) 

それ ぞ れ の 記述 は , 第 3 章 の 3 次 元 デ ザイ ン ツ ー ル ・ プ ログ ラム に 登録 し て いる 図形 記述 の た め の 
も の と 同様 に ワイ ヤー フレ ー ム ・ モ デル で 記述 し て いま す 。 


| 球体 (GPHERE) | 


SPHERE は 球体 を 表し ます 。 形 状 記述 指定 は 半径 R で 指定 し ます 。 

基本 的 に は ワイ ヤー フレ ー ム ・ モ デル の 記述 で す の で , X 軸 上 一 か ら R まで の XX 軸 に 対し て 垂 
直 な 面 で の 切り 口 (円 ) >, Y 軸 上 一 か ら まで の 1 点 で Y 軸 に 対し て 垂直 な 面 の 切り ロ (円 ) 
(ED x. 

双 軸 に 対し て 垂直 な 切り 口 の 円 の 方程式 は , 


| y =v R* — xi?cost 
z—V/ Р? — xi! sint 


Y 軸 に 対し て 垂直 な 切り 口 の 円 の 方 程 式 は , 


Y 


Y 軸 に 垂直 な 切り ロ 


図 4 一 | 球体 表現 
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£= R* — y tost 
z —y R* — yj?sint 


と 表す こと が で きま す 。 
これ ら の 円 の 切り 口 の 位置 を 変え て 連続 させ る こと に より , 球面 を 表現 する こと が で きま す 。 


| 円 柱 (CYLINDER) | 


CYLINDER は 円 柱 を 表し ます 。 形状 記 述 指定 は , 円 柱 の 半径 R と 高 さ の Y 座 標 H で 表し ます 。 

これ も 基本 的 に は ,。 ワイ ヤー フレ ー ム ・ モ デル に よる 記述 で す の で , y=0,H pz >G R O 
円 を 表現 し た 後 , 円 柱 の 側面 に 直線 を 引か せ て いま す (つま り , 上 下 の 円 周 を 分 割 し た 点 を 結ば せ て 
いま す )。 

円 柱 の 方 程 式 は , 次 の よう に 表せ ます 。 
у=0 (また は у= H> 


х= R cost 


у= Р sint 


| H (CONE) : 


СОМЕН, ET, ЛЕМНІ y=0 で の 半径 R と , PoR H で 表し ます 。 こ 
れ も ワ イヤ ー フ レー ム ・ モ デル な の で , y=03 kO Н で 円 を 描か し た 後 , 円 雛 の 側面 に 直線 を 引か 
せ て いま す 。 

Но, 次 の よう に 表せ ます 。 


y=0 у=Н 
x = Ri1cost x = R cost 
z= Бівіп/ z= Rasgint 


(た だ し К„=0 の 場合 は 円 雛 , R0 の 場合 は 円 雛 台 ) 


図 4 一 2 円 柱 表現 図 4 一 3 PRIR 
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| [直方 (RECTANGULAR) | 


RECTANGULAR は 直方 体 を 表し ます 。 形 状 記述 指定 は , 直方 体 の 縦 方 向 の 長 さ 万 , 横幅 
W, 奥行 の で 表現 し ます 。 直 方 体 を 構成 する 8 頂点 は , 図 4 一 4 の よ うに 表現 で きま す 。 

それ ぞ れ の 頂点 を 結ぶ と , 直方 体 を 表す こと が で きま す 。 本書 の マッ ピン グ 処 理 で の アル ゴリ ズム 
で は , 正方 形 全 体 を 表現 せ ず に , ІНЕ, 立 面 , 側面 の 3 面 の み を 表現 し て いま す 。 


| [Blézf (ROTATION ) | 


ROTATION は 回 転 体 を 表し ます 。 
基本 的 に は , 円 凶 を 連続 的 に 表現 し た 形式 を と っ て いま す 。 し た が っ て , まず 基点 の у= 0 の と き , 
半径 を アダ (0 ) と し て 入力 する と , 次 の よう に 書き 表せ ます 。 
у=0 
х= ЕХ (0 ) соѕ/ 
z— РХ(0)ѕіпі 
Y 軸 に 移動 量 パ XY(1), その と き の 半 径 を РХ(1) と する と , 
y-RY(1) 
x= РХ (1)cost 
z= アダ (1 ) sin 7 
と 書き 表せ ます 。 順次 , Y 軸 上 の 移動 量 を RY (n), その と き の 半 径 を RX (m) と する と , 
y= RY (n) 
х= РХ (n) cost 
z= RX (и) sin 7 
と 表現 で きま す 。 


図 4 一 4 直方 体 表現 図 4 一 5 回 転 体 表 現 
以上 の プリ ミ テ ィ ブ を それ ぞ れ 指定 し た 後 , それ ぞ れ の テク スチ ャ の 画面 を 。 プリミティブ の 表面 
に は りつ け て いき ます 。 


Жат マッ ピン ク グ 処 理 技術 


ン の 指定 


EE 


X1 ター ボ は , 低 解 像 画面 (640X200 ド ッ ト ) 指定 の 場合 , 2 画面 持っ て いま す 。 そ こ で , マッ 
ピン グ を 行う た め の 表 面 パ ター ン は , LOAD 命令 で いっ た ん スク リー ン 2 に 呼び 出し て か ら 行 いま 
す 。 ス クリ ー ン 0 の ほう に は , マッ ピン グ を 行う た め の プ リ ミ テ ィ ブ の 形状 を 記述 し て いま す 。 

X1 シリ ー ズ に は , 640X200 ド ッ ト の 画面 が 1 画面 し か あり ませ ん の で , 320X200 ド ッ ト の 画面 
を 使い ます 。 そ を の た め に , マッ ピン グ ・ プ ログ ラム を 少し 変更 し て 使用 し て くだ さい 。 変更 場所 は , 
各 プ ログ ラム の 最後 に 記載 し て あり ます 。 

な お , スク リー ン 1 た 記述 する た め の パ ター ン の デザ イン は , 第 2 章 の デザ イン ツー ル ・ プ ブロ グラ 
ム で 作成 し た も の を 使用 する わけ で す が , メイ ン メ ニュ ー か ら 1. SCREEN MENU を 選択 し た 
Ж, X 1 ター ボ で ご 使用 の 読者 は , [1] の 画面 で 描い た 5 え で 画面 セー ブ を , X 1 シリ ー ズ ご 使用 の 読 
者 は , [2] の 画面 で 描い た も の を 必ず 使用 し て くだ さい 。 


プリ ミ テ ィ ブ マッ ピン グ を 行う た め の 
の 形状 記述 表面 パタ ー ン 


スク リー ン 0 RR 


図 4 一 6 X1 タ ー ボ の マッ ピン グ 画 面 


プリ ミ デ ティブ マッ ピン グ を 行う た め の 
の 形状 記述 (0, 0) 表面 パタ ー ン 


スク リー ジコ 


図 4 一 7 X11 シ リー ズ の マッ ピン ク 画 面 


РЕТ РА 


マッ ピン グ 処 理 を 施す た め の 座 標記 述 は , 平行 投影 で 描い て あり ます 。 そ の た め , パー スペ クティ 
ブ プ は か か り ま せん の で ご 注意 くだ さい 。 

平行 投影 は , 一 般 的 に 製図 等 で よく 用 いら れ て いる も の で す 。 物 体 そ の も の が 投影 面 に 対し 平行 に 
投影 され る た め , 投影 面 上 で の X, Y の 座標 値 は まっ た く 変 わり ませ ん 。 

物体 形状 の 記述 は , 第 3 章 の 「 3 次元 デザ イン ッ ー ル 」 と 同様 に , 左手 系 で 描い て あり ます 。 スク 
リー ン 座 標 は 平行 透視 の た め Z 軸 は 関係 し な い の で 固定 し て いる と 考え て , ワー ルド 座標 軸 に 描か れ 
た 物体 その も の の 座標 が 表 さ れる こと に な り ま す 。 そ の た め , スク リー ン 上 に $ 物 体 指定 その も の の 
座標 形状 が 記述 され ます 。 


ワー ルド 座標 


スク リー ン 座 標 


図 4 一 8 ワー ルド 座標 プス クリ ー ン 座標 と 視線 の 関係 
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2... 


球体 へ の マッ ピン グ 技 術 は 。 テク スチ ャ パタ ー ン 画面 に 描か れ た 画面 上 の ピク セル 情報 を , 球面 の 
それ ぞ れ の 座標 値 へ 変換 させ て 指示 し て いき ます 。 
テク スチ ャ パタ ー ン 画面 か ら 球 面 へ の 変換 式 は ,。 テク スチ ャ パタ ー ン の Y 方 向 の 倍率 SC, を 求め 
ます 。 テ クス チャ 画面 の Y 方 向 の 長 さ を Ly と する と , マッ ピン グ の た め の 球 の 円 周 の 半分 は nR で 
ある の で , 
SCy= zR/ Ly 
と 書き 表せ ます 。 
次 いで , テク スチ ャ ペタ ー ン 画面 の Y 方 向 の 長 さと 対応 する 球体 の 点 Px を 求め ます 。 
Ry= R cos б, 
б-//Іл бл (227v) 
次 に PY 軸 に 対し て 垂直 な 面 の 切り 口 の 円 の 半径 LL を 求め ます 。 
LL-/R'-PY* ` 
今度 は 。 マッ ピン グ す る 側 の 画面 (スク リー ン 0 側 ) の 双方 向 の 倍率 5С, を 求め る と , 
SCy—z • LLZ Lx 
と 書き 表せ ます 。 
次 に , テク スチ ャ ペタ ー ン 画面 の X 方 向 の 点 と 対応 する 球 の 点 Ру, Р, を 求め る と , 
P= LL cos 6, 
P;—LLsin 6 
た だ だし. 12 Ла т. (ラジ アジ ) 


スク リー ン 2 (X1 ター ボ の 場合 ) スク リー ン 0 
スク リー ン 1 (X1 の 場合 ) 


(Xe, Ye) 


М 


(639, 199 


テク スチ ャ パタ ー ン 画面 vut WB 


図 4 一 9 球体 へ の マッ ピン グ 
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と 書き 表す こと が で きま す 。 
リー ン 上 に セッ ト す る と , 球面 へ の マッ ピン グ が 行わ れ ま す 。 


NE この プロ グラ ム を 入力 し て 実行 (RUN) させ 
| ブロ グラ ム の 操作 方 法 |К 


(SCREEN LOAD) 
FILE NAME ? 


と 聞い て くる の で , 第 2 章 の デザ イン ッ ー ル ・ プ ログ ラム で 作成 し た 画像 デー タ の うち , マッ ピン グ 
し た い 画 像 の ファ イル 名 を 入力 し て , 画面 上 に 読み 込ん で くだ さい (スク リー ン 1 に 読み 込ま れ ま 
す )。 読 み 込み が 完了 する と , いよ いよ マッ ピン グ 処 理 の た め の 物 体形 状 の 記述 に 入り ます 。 画面 上 
に は , 


EN Jogo | 


と 聞い て きま す 。 こ の マッ ピン グ ・ プ ログ ラム は , 球体 へ の 処理 技術 な の で , 半径 の 数 値 を 入力 し て 
くだ さい 。 
次 いで , 球 を 画面 で の この 位置 に 描く か の 設定 を 行い ます 。 コ マン ド は , 


メーー MOVE 
Y—— MOVE 


と 聞い て くる の で , ワー ルド 座標 軸 に 描く 球体 を , 原点 か ら ど こ に 描く の か , 中 心 の X, Y 座標 の X 
軸 の 移動 量 , お よび Y 軸 の 移動 量 を 入力 し て くだ さい 。 

スク リー ン 座 標 は ワー ルド 座標 系 に 描か れ た 物体 の 座標 軸 に 対し , 右 ネ ジ の 回 転 で 前 進 する 方 向 を 
正 の 値 と し ます 。 

例え ば , X の 移動 量 を 50, Y の 移動 量 を 30 と 入力 し た 場合 は , 平行 透視 で 記述 し て いる の で , € 
の まま X= テ 50, Y= テ 30 を 中 心 に 指定 する こと に な り ま す 。 画面 上 に 表示 する 場合 は , その まま 画面 
右 方 向 に 50, 上 方 向 に 30 い っ た 所 が 中 心 に な り ま す 。 


次 いで , 
メーーANGLE = 
Y——ANGLE = 
Z 一 一 ANGLE = 


と 聞い て くる の で , 物体 の 回 転 角度 を 入力 し て くだ さい 。 

座標 記述 は , ワー ルド 座標 系 に 描く 物体 が , 座標 軸 に 対し 右 ネ ジ の 回 転 で 前 進 する 方 向 を 正 の 値 と 
する た め , 例え ば , X の 回 転 角度 を 30 度 , Y を 20 度 , Z を 50 度 と 指定 し た 場合 に は , その まま , 図 4 
—10 の 矢印 の 方 向 に X 軸 を 30 度 , Y 軸 を 20 度 , Z 軸 を 50 度 回 転 し た 記述 の 状態 で 記憶 され ます 。 
次 いで , 
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と 聞い て くる の で , 表示 し た い 色 番号 を 黒 を 入れ た 8 色 の 中 か ら 入 力 し て くだ さい 。 [0] を 指定 する と , 
画面 に は 表示 され ませ ん が , 実際 は 黒色 で 描か れ た 後 の マ ッ ピ ング 画面 の み 表 示さ れ ま す 。 

これ で スク リー ン 0 画面 に 物体 形状 が 記述 され た の で , 実際 は この 球体 に マッ ピン グ を 施す た め の 
テク スチ ャ パタ ー ン の 処理 画像 テリ ア を 指定 する こと に な り ま す 。 ュ マン ド は , 


SCREEN X START = 
SCREEN X END 
SCREEN Y START = 
SCREEN Y END 


と 連続 し て 聞い て くる の で , 画面 エリ ア を 指定 し て くだ さい 。 こ と で テク スチ ャ パタ ー ン の 処理 画像 
エリ ア は , スク リー ン 1 の 2 次 元 パ ター ン の どの 位置 で も 指定 する と と が で きま す 。 

例え ば , 図 4 一 11 の よう に , テク スチ ャ パタ ー ン 面 の マッ ピン グ エ リ ア を 指定 する こと か ら , 種々 
の 処理 が 実行 され ます 。 こ の 状態 で , 物体 の アン グル を 変化 させ て いる 場合 は 。 マッ ピン グ さ れる 面 
が 回 転 し て いる た め , お も し ろ い 結果 を 生み 出し ます 。 

マッ ピン グ が 完了 する と , 


D 
の 


ワー ルド 座標 系 


スク リー ン 座 標 系 


図 4 一 !0 ワー ルド 座標 / ゾ スク リー ン 座 標 と 視線 の 関係 
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(SAVE) 
FILE NAME ? (//' -RETURN) 


と 聞い て くる の で , 16 文 字 以 内 で ファ イル 名 を 付け て SAVE し て くだ さい 。 フ ァイル ・ デ ィ ス クリ 
プ タ を 指定 する と , それ ぞ れ の ディ バイ スル ・ フ ァイル が 可能 で す 。 

0: フ ロッ ピー の ドラ イブ 0 に 記録 する 

1: フ ロッ ピー の ドラ イブ 1 に 記録 する 

CAS: カセ ッ ト デ ー タ レ ュ コー ダ に 記録 する 


44-і! マッ ピン グ エ リ ア の 指定 
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・ 球 体 へ の マッ ピン グ 出力 例 


テク スチ ャ パタ ー ン 


テク スチ ャ パタ ー ン 


テク スチ ャ パタ ー ン 
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| プロ グラ ム の 内 容 | プロ グラ ム の 内 容 に つい て は , 球体 の 形状 記述 

式 や マッ ピン グ 計 算 方 法 に つい て , すでに 解説 済 
み で す の で , ここ で あら た め て 述べ る まで も な いと 思い ます が , フロ ー チ ャ ー ト に 基づい て 解説 し ま 
す 。 な お , この プロ グラ ム は ХІ ター ボ 用 の 640X200 ド ッ ト 画 面 と し て 書い て ある の で , ХІ シリ 
ー ズ で ご 使用 の 読者 は (320X200 ド ッ ト で 使用 し ます ), X1 シリ ー ズ 用 の プロ グラ ム 変 更 リ スト を 
参考 に し て 入れ か えて くだ さい 。 

行 番号 100 か ら 130 で 初期 設定 を し て いま す 。130 行 の X0,Y0 は , スク リー ン 画 面 0 の 座標 原点 を 
表し て いま す 。 原点 変更 を し た い 方 は , 変化 させ て 違い を 見 て くだ さい 。 210 行 で , 画面 を テク スチ 
ャ パタ ー ン 画面 (X 1 ター ボ ど 使用 の 読者 は スク リー ン 2, X1 シリ ー ズ ご 使用 の 読者 は スク リー ン 
1) に 指定 し た 後 , 4000 一 4130 行 で テクス チャ パタ ー ン 画面 を LOAD し ます 。 こ の テク スチ ャ パタ 
ー ン 画面 は 。 前 著 「 パ ソ ュ ング ラフ ィ ッ クス の 作り 方 楽し み 方 」 (学研 版 ) で 紹介 し た 「 デ ザイ ン ッ 
ー ル 」 で 作成 し た 画面 で も , 本 書 第 2 章 で 紹介 し て いる 「 デ ザイ ン ツ ー ル 2 | で 作成 し た 画面 の ど ち 
ら で も 使用 する こと が で きま す 。 

また , あたり まえ の こと で す が , 一 度 マ ッ ピ ング し た 画面 を あら た め て SAVE し た 後 , LOAD 
し て 使用 する こと も 可能 で す 。220 行 で , 画面 を マッ ピン グ 画 面 (スク リー ン 0) に 切り 替え て , 
1000-1030 行 の マッ ピン グ す る 物体 (球体 ) の 座標 記述 の サブ ルー チン に と ば し , まん た , 
3000~3110 行 の 3 次元 座標 変換 値 の 入力 サブ ルー チン に と ば し て いま す 。 

230 行 で , 球体 の 描く 色 が 0 (黒色 ) の 場合 は , 描か ず に その まま 2000 行 以下 の マッ ピン グ の た め 
の サブ ルー チン に , 0 以外 の 場合 は , 1500 一 1680 行 の サブ ルー チン で 球体 を 描き ます 。2000 一 2240 
НІ, マッ ピン グ の た め の サ ブル ー チ ン で す 。 詳し く は , すでに 計算 式 の 解説 を し て いま す の で , 7 
ロー チャ ー ト を 参考 に し な が ら 解 明 し て くだ さい 。 

マッ ピン グ が 終了 する と , 260 一 300 行 の ファ イル の た め の メ ニュ ー 表 示 に 戻り ます 。 310 行 で キー 
入力 待ち の 後 , キー イン で 6000 一 6150 行 の 画面 SAVE の サブ ルー チン , [2]| キ ー イ ン で 
5000--51601 2 LOAD の サブ ルー チン , [31] キ ー イ ン で 終了 と な り ま す 。 


PAL ( ) | パレ ッ ト コ ー ド | | XS マッ ピン グ 用 画面 の 左端 
XO スク リー ン 中 央 の 位置 ( X 座 標 ) YS マッ ピン グ 用 画面 の 上 端 
YO スク リー ン 中 央 の 位置 ( Y 座 標 ) XE マッ ピン グ 用 画面 の 右端 | 
STP матасын ҮЕ マッ ピン グ 用 画面 の 下端 
STP1 | cc マッ ピン グ 位 置 の カラ ー 
PC カラ ー コ ー ド MVX スク リー ン メ X 方 向 の 移動 
PX 物体 の 位置 ( X 座 標 ) | wy スク リー ン Y 方向 の 移動 
PY 物体 の 位置 ( Y 座 標 ) | RTX 物体 の X 軸 に 対す る 回 転 
PZ 物体 の 位置 ( Z 座標) | яту 物体 の 軸 に 対す る 回 転 
XP 3D 変換 後 の ス クリ ー ン ( X 座標 ) T RTZ 物体 の Z 軸 に 対す る 回 転 
YP 3D 変換 後 の ス クリ ー ン ( Y 座 標 ) | 
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球体 マッ ピン グ ・ プ ログ ラム の 流れ 


マッ ピン グル ー チ ン p 


Y 方 向 物体 と 


ー テク スチ ャ パタ ー ン 画面 の 倍率 の 決定 
画面 LOAD ーー x 


— FOR (画面 Y 方 向 ) 


T < ッ ヒ ンク の の s ーー 物体 の Y 座 標 計算 x 
(ЕК 2% i | x 
x c 1 ЕЕН 0 Oo 
ーー | аео р 


[ em ] 


ニュ ー 表 示 v : — - е 


WIRE FRAME 描く p | _ マッ ピン グ 画 か ら 


z y | | 3D 変換 計算 | 
キー 入力 ә. u | l. — 、 


; RETURN 
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1 


өдіс (H + š FJ 


球体 マッピング ・ プ ログ ラム リス ト 


人 


MAFFING — SFHERE 


“Чак 


Frrogrammed Бу [ SAIHU Л 


1985 . 4 。 1 


ыы аны ыды 
уу セリ テイ 
KLIST 日 :OFTION SCREEN B: 
DIM FAL (7) 
XQOzz2280: YO-100:STF-190:STF 
FOR Іч8 TO Ў: РАШ (I): I: МЕ 
メイ ゴー ルー キー ッ 

SCREEN 2,2,8: 60508 408060 
SCREEN 19,088, 8: GOSUE 109890: 
IF FC-B8 THEN 250 
COLOR FC:GOSUE 1508 
COLOR 7 :GOSUBR 2000 
FRW O:CLS:PRINT "EMAFFIN 
РБІМТ " 1. SCREEN SAVE" 
FRINT " 2. SCREEN LOAD" 
FRINT " 35, END" 
FRINT " Fush Key 1 ОЖ 
АФ=ІМЕЕҮФ (1) 

|! ON INSTR("12zZ",4$) GOSUE 
GOTO 218 
INIT:END 


GOSUE 609980: БОТО 
GOSUR 28960: БОТО 
プー ガツ ケイ 


INFLUT "+219 ss" К 
IF К-<8 THEN 1828 ELSE 
á Tau "Wo 
FOR 2--К TO К STEF STF 
R1zSUQR(ORXR-ZXZ):PX-R1: 
LINE (AP YP = (XP, ҮРУ, 
FOR ТН-8 TO 2608 STEF 
FX=R1*COS(FAD (TH) ) 
BUHSUE 5500: ІМЕ = (Kx 
NEXT 
NEXT 
FOR TH=8 TO 568 STEF ST 
FXz8:PYz-R:PFZzB8: GOSUR 


来 来 来 来 来 来 来 来 来 来 来 来 

WIDTH 88,25,0,0:CLS& 
1238 

XT 


BUSUE Z70608 


Б FILE 1" 


2 OR 3 "s; 


2608.270, 3740 


ニュ ウリ ョ ウ 


RETURN 


PYsZ:PZs8:GO0SUB 2500 
FSET, FC 
STF 


:FZ=R1XSIN(RAD(TH)) : FY=Z 


P. YP: 5 


F1 
2588 
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LINE «ХР. МЕУ СХЕ. YF} FSET, РС 
FÜR Z--R TO К ТЕЕ STP 
R1=SQR (RKR—ZXZ) 
РХ-К1ІЖСОв(КАр(ТН)) РҮз2:Р2-чБіжЖбІМ(КАр(ТН)) 
GÜSUB 5500: INE -(ХР, ҮР) 
МЕХТ 
МЕХТ 


Беу? 
LOCATE 8,7 
INFUT"SCREEN X START 
INFUT"SCREEN X END 
INFUT"SCREEN Y START- ", 
INFUT"SCREEN Y END "YE 
IF X8z80 OR YS£8 THEN 2888 
IF XE>6Z9 OR ҮЕ>199 THEN 2088 
IF XS>XE OR YS>YE THEN 2808 
FRW &HFF:LXsXE-XS:LYsYE-YS:SCYsPAI(R)/LY 
IF SCYé£1 THEN STF2-1 ELSE STF2-1/SCY 
IF SCX<1 THEN STPZ-1 ELSE STPZ-1/SCX 
FOR J«1/8CY TO LY STEF STF? 
FY-RXCOS (FAI (JZLY) ) 
LL=SHR (RXR-PYXFY) : SCXSFAI (LL) /LX 
FOR I-8 TO LX STEF STPZ 
SCREEN 8,2,8 
CC=FOINT(INT(XS+I+. 5), INT (YS+J+, 5) ) 
SCREEN 8,0,8 
FPX--LLXCOS(FAI(I/LX)) :zPZeLLXSIN(FAICI/LXO) 
GOSUE 3500 
FSET (XP,YF,CC):PSET (ХР-1,ҮР,СС) 
NEXT 
NEXT 


HH H H 


ニュ ウリ ョ ウ 
",МУХ 
Hi DIM Y 
RTX 


INFUT"X 
INFUT"Y 
INFUT"X 
INFUT"Y "КТУ 

INFUT"Z "RTZ 
SS=SIN(RAD (RTX) ) :CS=COS(RAD (RTY) ) 
SF=SIN(RAD(RTY)):CF=COS(RAD(RTY)) 
SF'=SIN(RAD (RTZ) ) : CF=COS (КАР (RTZ) ) 
INFUT" Color = ",PC 

IF (РС<8) + (РСУ7) THEN Z090 


l uw H H H 


ХР-РХЖСЕЖСЕ-РҮЖ (GSKXSFXCF-CSXSF) 
ХЕ-ХЕЗР Ж CCSXSFXCF-SSXSF) 
ҮР-РХЖСЕЖӨРЗРҮЖ (SSXSFXSF+CSXCF) 
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YFZYF-FZXKC(CCSXSFXSF-SSXCF) 
ZPz-PXXSF-PYXSSXCF-FZXCSXCF 
XPXÜMXPEZHMVX 

YPFzYO-YF-MVY 


sue р 2 Бек" 

СЦБ: ЕКІМТ "Е SCREEN LOAD 1" 
IMFLIT" FILE NAME ? ",T$ 
IF LEN(T$) >16 THEN 48868 
DFTION SCREEN 4: РЕК НЕЕ 
ОРЕМ"І", 1, ТФ: RE ビデ 日 
GOSUER 500: IF WIZ2868 THEN 40908 
A$=INFUT$ (128, 1):B$=INFUT$(128,1) 
рЕЧОФ"МЕМ1: ", КЕС, АФ, ЕФ: КЕС=КЕС+1 
IF RECZ£&HCGO THEN 4878 
CLOSE #1:FRW Ө: INIT:OFTION SCREEN Ө 
FOR I=ü TO 7 

FALET I РАЦ (І) 
NEXT: RETURN 
à A SG Шек” 
CLS:FRINT"E LOAD 1" 
INFUT" FILE NAME 7 ("/?*-RETURN) "TẸ 
IF LEN(T$)71& THEN 5000 
IF T£$-"/" THEN RETURN 
GOSUR S098 
FOR 1= TO 7 

FALET I FAL(I) 
NEXT: RETURN 
OFTION SCREEN 4: FRU £&HFF 
ОРЕМ"І", 1, ТФ: БЕС=0 
GOSUR 658080: IF WIz;88 THEN RETURN S080 
A$=INFUT$ (128, 1): B$=INFUT$ (128, 1) 
DEVO"MEM: "Ü", КЕС, АФ, ЕФ: REC=REC+1 
IF RECZ£&HCO THEN 5126 
CLOSE #1:FRW O: INIT 
OFTION SCREEN Ө: CLS: RETURN 
? азу, セー ズ 
FRW BigCLS 
ЕКІМТ"І SAVE 1" 
INFUT" FILE МАМЕ ? (?/*-zRETURN) 
IF (ЕМ(Т%) 216 THEN GOTO 688098 
IF Тжх"/" THEN RETURN 
OFTION SCREEN 4:PRW ЕНЕР 
ОРЕМ"0", 1, ТФ: КЕС=0 
FRINT 41,88 
FOR I=8 TO 7 

FRINT #1,ЕА (I) 
NEXT 
DEVI*$"MEM:".REC., АФ, BE:FRINT#1, $: E$; 
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REC=REC+1 
IF КЕС<#НСӨ THEN 6128 
GOTO 5158 


WIDTH チェ リク 
ІМРОТ *1,WI 
IF WIZ2880 THEN 6550 
FOR I-8 TO 7 
INFUT #1,РА (I) 
NEXT: RETURN 
GOSUE 5150 
FRINT"WIDTH IS NOT 88 !! (Fush Any key) 
КҮФ-ІМКЕҮФ(1) 
RETURN 


X ] シリ ー ズ を 使う 場合 は 次 の 各行 を 変更 ・ 追 加 し ます 。 


118 OFTION SCREEN 1:WIDTH 48:CLS 
1380 X0-2160:Y0-188: STF-18: STP1-:8 


210 SCREEN 1,1,0:GO08UR 40868 


2878 IF ХЕ>519 ОК YE^199 THEN 2888 
216 SCREEN 8,1,8 
2210 FSET (XF; ҮР; СС) 


X560 XPFzXO-XF--MVX 


40480 OFTION SCREEN 2:FRUW ЕНЕР 

480580 OFEN"I",1,T$:REC-4 

48680 GOSUB 6500:1F МІс>48 THEN 4888 
48088 ПЕУОФ"МЕМӘӨ: ", REC, A$, E$: REC-REC-*1 
4885 IF (REC MOD 8)-8 THEN REC=REC+4 
418080 CLOSE #1:FRW Ө: INIT: OPTION SCREEN 1 


5098 OFTION SCREEN 2: РЕМ ЕНЕР 

3118 GOSUR 6500: IF WIz7;480 THEN RETURN S888 
3135 IF (КЕС MOD 42-8 THEM REC=REC+4 

51608 OFTION SCREEN 1:CLS: RETURN 


6868 OFTION SCREEN 2: FRW ЕНЕР 
68088 FRINT 41,48 
61380 REC=REC+1:IF (REC MOD 420-8 THEN КЕС=КЕС+4 


65180 IF WIZ7240 THEN 5550 
6568 PRINT"WIDTH IS NOT 48 !! (Fush Any key) "s 
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円 柱 へ の マッ ピン グ ・ 


円 柱 へ の マッ ピン グ 処 理 は 。 テク スチ ャ パタ ー ン 画面 上 に 描か れ た ピク セル 情報 を , 円 柱 の それ ぞ 
れ の 座標 値 へ 変換 させ ます 。 
処理 エリ ア は , 円 柱 の 側面 へ の マッ ピン グ と , 上 下 の 円 面 へ の マッ ピン グ の 2 通り に 分 けら れ ま す 。 
円 柱 の 側面 へ の マッ ピン グ は , テク スチ ャ パタ ー ン 画面 上 に 描か れ た テク スチ ャ か ら , 必要 な パタ 
ー ン の 叉 方 向 の 長 さ を Ly 方向 の 長 さ を Ly と する と , マッ ピン グ 画 面 上 X 方 向 の 倍率 SO と , 
Y 方 向 の 倍率 SCy は , 次 の よう に 書き 表す こと が で きま す 。 
SCy— xe R/ Lx 
SCy= H / Ly 
テク スチ ャ パタ ー ン 画面 の 1^ (1, J) に 対応 する 円 周 上 の 点 CP, Px, Po) は , 
Р„=— R соѕ 6, 
Р.-Н-).Н/1, 
Р;= Ё sin 6, 
(た だ し &-I/LXz (92777) 
と 書き 表す こと が で きま す 。 
上 下 の 円 面 へ の マッ ピン グ は ,。 テク スチ ャ パタ ー ン 画面 の 1 点 (7 J) に 対応 する 上 下 の 円 面 上 の 
BUE (Px, Py, P) と する と , Py tz, 
P,=H また は 0 (た だ し 末 は 上 面 , 0 は 下面 ) 
と 書き 表せ ます 。 
マッ ピン グ 画 面 上 の Y 方 向 の 倍率 を SCy と する と, 


スク リー ン 2 (X1 ター ボ の 場合 ) スク リー ン 0 
スク リー ン 1 (X1 の 場合 ) 


テク スチ ャ パタ ー ン 画面 マッ ピン グ 画 面 


図 4 一 I2 円 柱 の 側面 へ の マッ ピン グ 
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スク リー ン 2 (X1 ター ボ の 場合 ) スク リー ン 0 
スク リー ン 1 (X1 の 場合 ) 


(639,199) ~~ 


テク スチ ャ パタ ー ン 画面 マッ ピン ク 画 面 


図 4 一 !3 円 柱 の 上 下 の 円 面 へ の マ ッ ピ ング 

сас e 246 
と 書き 表す こと が で きま す 。 次 に , 円 弧 上 の 任意 の 点 か ら Z 軸 に 垂直 な 線 を 描き , その 長 さ を LL, 
Z 軸 上 の 線 を 万 と する と , 

LL-V/R'-H* 

H'-R—-J*SCY 


と 書き 表せ ます 。 マ ッ ピ ング 画面 の X 方 向 の 倍率 SCx は , 
SC,—-2LL/ Lx 
と 表せ ます 。 
次 いで , テク スチ ャ パタ ー ン 画面 の XX 方 向 の 点 と 対応 する 球 の 点 P, Р, を 求め る と 
P,-I-SCX-LL 
Ба J-SCY-R 
と 書き 表す こと が で きま す 。 
以上 の 計算 式 か ら , テク スチ ャ パタ ー ン 上 の 点 (1, J) の 色 を 決め , Px, Px, 用 を 座標 変換 し た スク 
リー ン 上 に セッ ト す る と , 上 下 の 円 面 へ の マッ ピン グ が 行わ れ ま す 。 


プロ グラ ム の 操作 方法 e= ш: 


(SCREEN LOAD) 
FILE NAME ? 


と 聞い て くる の で , 第 2 章 デ ザイ ン ッ ー ル ・ プ ログ ラム で 作成 し た 画像 の デー タ の うち , マッ ピン グ 
し た い 画 像 の ファ イル 名 を 入力 し て , 画面 上 に 読み 込ん を で くだ さい 。 読み込み が 完了 する と , いよ い 
よ マ ッ ピ ング 処理 の た め の 物 体形 状 の 記述 に 入り ます 。 
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画面 上 に は , 


と 順次 開い て きま す 。 円 筒 の 形状 を , 半径 (RO と 高 さ (Н) の 値 を 決め て 入力 し て くだ さい 。 
次 いで , スク リー ン 座 標 の どこ に 描く の か を 決定 し ます 。 球体 の 場合 と 同様 に , 画面 の コマ ンド 指 
示 に 従っ て , 次 の 値 を 入力 し て くだ さい 。 


た だ , 円 柱 の 原点 は , 円 柱 の 底面 の 中 心 点 こと っ て ある の で , 画面 中 央 に 描き た い 場 合 は , その 位 
置 に 注意 し て くだ さい 。 
次 いで , 


図 4 一 !4 ワー ルド 座標 ノ グ ス クリ ー ン 座標 と 視線 の 関係 
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SCREEN X START = 
SCREEN X END = 
SCREEN Y START = 
SCREEN Y END = 


4—15 マッ ピン グ エ リ ア の 指定 
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場合 は , X の 値 は 0 ~ 6390, Y の 値 は 0 199 の 間 で 決め て くだ さい 。X 1 の 場合 は , Xofüu. 
0~319 の 間 , Y の 値 は 0-199 の 間 で 決め て くだ さい )。 
次 いで , 


と 聞い て くる の で , マッ ピン グ し た い エ リア の 指定 を 行っ て くだ さい 。 

例え ば , 側面 に 指定 する 場合 は [1] を キー イン する と マッ ピン グ が スタ ー ト し , 終了 する と 再び 
テク スチ ャ パタ ー ン 画面 の マッ ピン グ 表 示 領 域 の ュ マ ンド に 戻る の で , 連続 し て 他 の 画面 に 処理 を 行 
いた い 場 合 は , 続け て 指定 し て くだ さい 。 

マッ ピン グ が 完了 する と, 


(SAVE) 
FILE NAME ? (ンーRETURN) 


と 聞い て くる の で , 16 文 字 以 内 で ファ イル 名 を 付け て SAVE し て くだ さい 。 フ ァイル ・ デ ィ ス クリ 
プ タ を 指定 する と , それ ぞ れ の デバ イス に ファ イル が 可能 で す 。 
ems 球体 の 場合 と 同様 に , XX 1 シリ ー ズ ご 使用 の 読 
тә 
| ブロ グラ ム の 内 容 | 者 は , X 1 シリ ー ズ 用 の プロ グラ ム 変 更 リ スト と 
入れ か えて ご 使用 くだ さい 。 


行 番号 100 一 130 行 で 初期 設定 を し て いま す 。 130 行 の X 0, Y 0 は スク リー ン 画 面 0 の 座標 原点 を 
表し て いま す 。 円柱 の 座標 値 計算 は , (0, 0) 点 で 円 柱 の 下面 の 中 心 点 こ と っ て いま す 。 

210 行 で 画面 シテ クス チャ パタ ー ン 画面 (X 1 ター ボ 使 用 の 読者 は スク リー ン 2, X 1 使用 の 読者 
は スク リー ン 1 ) に 指定 し た 後 , 4000-4130 行 で テクス チャ パタ ー ン 画面 を LOAD し ます 。220 行 
で 画面 を マッ ピン グ 画 面 (スク リー ン 0) に 切り 替え て , 1000-1050 行 で 円 柱 の 座標 記述 の サブ プル 
ー チ ン に と ば し , 3000 一 3110 行 で 3 次 元 の 座標 変換 値 の 入力 サブ ルー チン に と ば し て いま す 。 

230 行 で , 球体 が 描く 色 が 0 RE) の 場合 は , 描か ず に その まま 2000 行 以降 の マッ ピン グ の た め 
の サブ ルー チン に , 0 以外 の 場合 は , 1500 一 1690 行 の サブ ルー チン で 円 柱 を 描き ます 。2000 一 2660 
11%, マッ ピン グ を 行う た め の サ ブル ー チ ン で す 。 2200 一 2350 行 で 円 柱 の 側面 へ の マッ ピン グ , 
2500 一 2660 行 で 円 柱 の 上 面 下面 へ の マッ ピン グ を 行っ て いま す 。 これ ら の 計算 式 は , 前 述 の 解説 を 
参考 に し て くだ さい 。 

マッ ピン グ が 終了 する と , 260 一 300 行 の ファ イル の た め の メ ニュ ー 表 示 に 戻り ます 。310 行 で キー 
入力 待ち の 後 , 則 キ ー イ ン で 6000 一 6150 行 の 画面 SAVE の サブ ルー チン , [2] キ ー イ ン で 
5000—~ 5160070 ТОА” の サブ ルー チン , [3] キ ー イ ン で 終了 と な り ま す 。 


116 


第 4 章 マッ ピン グ 処 理 技術 


円 柱 へ の マッ ピン グ 出力 


テク スチ ャ パタ ー ン 


テク スチ ャ パタ ー ン 
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パレ ッ ト コ ー ド マッ ピン グ 用 画面 の 左端 


スク リー ン 中 央 の 位置 ( X 座 標 ) | Ys | マッ ピン ク 用 画面 上端 
スク リー ン 中 央 の 位置 ( Y 座 標 ) | " マッ ピン グ 用 画面 の 右端 


マッ ピン グ 用 画面 の 下端 
マッ ピン グ 位 置 の カラ ー 


円 弧 の 角度 (STEP ) 


Cm [jweosx(vaw) | ho анонса 


円 柱 の 側面 へ の 2. 
マッ ピン グル ー チ ン || 

円 柱 の 上 面 下面 へ の 

マッ ピン グル ー チ ン 


メニ ュー 表示 


マッ ピン グ 物 体 (円 柱 ) | 
の 半径 , 高 さ 入力 | 


画面 SAVE 


画面 LOAD 
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円 柱 マ ッ ピ ング * プロ グラ ムリ スト 


MAFFING 一 CYLINDER дак 
Frogrammed By L SAIMU 1 


1985 . 4 . 1 
“Ж 
> ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ 
хр セリ テイ 
ELIST 日 :OFTION SCREEN GO:WIDTH 88,25,8,0:С15 
DIM FAL (7) 
XO0-zzB8: YO-100:STF-18:STF1-—zi8 
IT= TO Z:FAL(I)=I: NEXT 
жә ルー チエ 

SCREEN 2,2,9: 50508 4900 
SCREEN 8,9,9: GOSUE 1880: GOSUE 50080 
IF РС=9 THEN 238 
COLOR FC:GOSUE 1588 
COLOR 7 : 60506 28809 
FRW O:CLS:FRINT "LMAFFING FILE 
FRINT " 1. SCREEN SAVE" 
FRINT "i 2. SCREEN LOAD" 
FRINT ^" Zae END" 
FRINT " Fush key 1 QR 2 ОК F 
生ま =TNEEY ま (1 ) 
DON INSTR( "1 で さり A$) GOSUR Z360, 370, 346 
GOTO 3108 
INIT:END 


GOSUE 6888: GOTO 
GOSUR 5000: GOT 
エコ チュ ウー JU de H9 23937 


INFUT "хиа 2 R =", R 
IF К-<8 THEN 1818 
INPUT "エン チュ ウー H =",H 
1818 ELSE RETURN 
エー チュ ウ 9 ІП"? 
PXsR:PY-H:PZ-80:GOSUB 3500 
LINE (ХЕ, YF) – (ХЕ, YF) , PSET, FC 
FOR ТН-8 TO 568 STEF STP 
FPXSRXCOS (RAD (ТН) ) =FZ=RSIN (RAD(TH) ) 
GOSUE 3580:LINE -(ХР,ҮР) 
NEXT 
PXsR:iPYs8:PZ-0:G608UB 2508 
LINE (XF,YF) — (XP, YF) , PSET, РС 
FOR TH=B TO 360 STEF STF 
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FX-RXCOS CRAD (ТН) ) z*"ZzRXSIN(GRAD(GCTH2) 
GOSUB 5500: ІМЕ —(XF, YF) 

NEXT 

FOR TH=B TO 368 STEF STF1 
PYzH:PX-RXCOS CRAD (ТН) ) zPZzRXSIN(GRAD(GCTH)) 
GOSUB 3S88:LINE(OXPF, YF) ~ (ХЕ, YF) 。FSET。 РЕ 
FY-O:GOSUB 3508 
LINE — CXF, YF? 
NEXT 
FRW 8: RETURN 


:---------- エン チュ ウー / uwbtL)* ---------------- 


LOCATE 8,8 
INFUT"SCREEN X START- ",XS 


INFUT"SCREEN X END = "XE 
INFUT"SCREEN Y START= ",YS 
INFUT"SCREEN Y END = "YE 


IF Х5<0 OR Ү5<0 THEN 2008 
IF ХЕ>629 OR ҮЕ>199 THEN 2000 
IF Х5>ХЕ ОК YS2YE THEN 2000 
FRINT:FERINT"MAFFING AREA" 
PRINT" De 4 
PRINT" 2. y " 
FRINT" 3. ж " 
РКІМТ" 4. END " 
ASZCINEEYS$O»D 
IF A$="1" OR A$z"2" OR A$="3" THEN 2178 
IF ñ*="4" THEN RETURN ELSE 2148 
FRW &HFF:MS=VAL (A$) 
ОМ M&S GOSURE 2200, 25009, 2500 
FRW 8:GOTO 2006 
LX=XE-XS:LY=YE-YS:SCX=FAI(R)/LX:SCY=H/LY 
IF SCYZz1 THEN STF2=1 ELSE STFZ2z1/SCY 
IF 5СХ“1 THEN STF ミ =1 ELSE STF ミ =1/SCX 
FOR J= TO LY STEF STF? 
FYzH-JXSCY 
FOR I-8 TO LX STEF ТЕТ 
SCREEN 8,2,8 
CC-FOINT(CINT(CXS-I-.Z0,INT(CYS-J4-.5)) 
SCREEN 日 ,日 , 日 
FXz-RXCOS((OFAICI/LX)O:FZZzRXSIN(G'AICI/LX)?) 
GOSUB 3500 
FSET CXP.YF.DCXSPSET (XPT1 YF ССЭ 
NEXT 
NEXT 
RETURN 


кн рашкан utut «plz? cu түл") ツウ だ > ーー デー テー ニー デーーーー 


ーーーーーーーーーーー XwdE? L7" エン キュ ウー ЖІНЕ ee ee e e ae mee mee me me mene e ee en mee mee 


LX=XE-XS:LY=YE-Y§S:FPY=Hx CZ-MS):8CY-2XR/LY 
IF SCYZz1 THEN STF2=1 ELSE STF2-1/SCY 
IF SCXZz1 THEN STFZ-1 ELSE GTF さ =1/SCX 
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25480 FOR Ј=1/5СҮ TO LY STEF STF2 


ym 
I 


2568 
2978 
2980 
2598 
2608 
2618 
2620 
2638 
2648 
2658 
2660 
3888 
i818 
38928 
3838 
2848 
38989 
3868 
3878 
i888 
3898 
31898 
3118 
35808 
5519 
3928 
353 

3948 
3550 
2560 
3578 
3588 
4888 
48018 
4028 
49038 
48048 
48058 
480698 
4078 
48088 
4898 
4188 
4118 
4120 
4138 
3888 
58108 


[ 


LL=SOR GIXSCYX C2XR-JXSCY)) 
SCX-2XLL/LX:PZ-JKSCY-R 
FOR I-8 TO LX STEF STP 
SCREEN 8,2,8 
СС=РОІМТ (INT(XS+I+.S) 。 INT(YS+J+.5)) 
SCREEN 8,8,8 
FXSIXSCX-LL 
GOSUE 3500 
FSET (ХР,ҮР,СС) :РЗЕТ (XF-1,YP,CC) 


NEXT 
NEXT 
RETURN 
ーーー ニーーー ウ キー AD^ Range. ニュ ウリ ヨ ツ ーーーー ニ ーーーーー デ ーー デーーー 
INFUT"X -- MOVE = ",MVX 
INFUT"Y == MOVE = ",MVY 
INFUT"X == ANGLE = ",RTX 
INFUT"Y == ANGLE = ",RTY 
INFUT"Z -- ANGLE = ",RTZ 


55=5ІМ(КАр (КТХ) ) : C8zCOS CRADCRTYO ) 
БЅЕ=5ІМ (КАР (КТҮ) ) : CFZCOS CRAD (КТУ) ) 
SFzSIN(GRAD (RTZ) ) : CPZCQOS CRAD CRTZ? ) 


ІМР ОТ" Color = РС 

IF (PC<0)+(PC>7) THEN 3098 

RETURN 

ーーーーーーーーーー ED / ガイ サニー ---------------------- 


ХЕ-РХЖСЕЖСЕ-РҮЖ (GSGXSFXCF-CSXSP) 
XFzXF-«-FZX CCSXSFXCF--HSSXSF) 
YFZPFXXCFXSF--FYX (GSKXSFXSFEFCSXCF) 
YFZYF-FZXIGGSXSFXSF-SSXCF?) 
ZFz-PXXSF-PYXSSXCF-FZXCSXCF 
ХЕ-ХО-ХРЖОЯМУХ 
ҮР-Ү0-ҮР-МУҮ 
RETURN 
:---------- コワ リー "メン フー ノー ロート" ————— 
CLS:FRINT"L SCREEN LOAD 1" 
INFUT" FILE МАМЕ で "T$ 
IF LEN(T$) >16 THEN 4888 
OFTION SCREEN 4:РКЫ ЕНЕР 
OFEN"I",1,T$:REC-G8 
GOSUB 6500: IF WIZ280 THEN 40808 
A$-INFUTS$128,1):B$-INFUT$(€128,1) 
DEVD*"MEM1: ", КЕС, A$, B$: REC=REC+1 
IF RECZ£&HCO THEN 4878 
CLOSE #1:FRW B: INIT: OFTION SCREEN Ө 
FOR I0 TO 7 

FALET І,РАЦ (1) 
NEXT: RETURN 
k'un メッ ブロート" 
CLS:FRINT"E LOAD 1" 
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S838 
35848 
3858 
3868 
50789 
3888 
S898 
51088 
51108 
5120 
8138 
5148 
51508 
5168 
2151515 
5818 
820 
аза 
6040 
6950 
2151215 
6078 
egag 
68098 
51808 
6118 
6120 
5138 
6148 
6158 
6490 
5089 
6510 
6528 
6538 
6548 
65258 
өзев 
6578 
ós588 


2278 


2328 


2588 


2630 


INFUT" FILE NAME ? (*/'-RETURN) ",T$ 


IF LEN(T£$) 515 THEN 5888 
IF T$-"/" THEN RETURN 
GOSUE 5898 
FOR I= TO 7 
FALET I,FAL(I) 
NEXT: RETURN 
OFTION SCREEN 4:FRW £HFF 
OFEN"I",1,T$:REC-8 
GOSUB 6580:1F МІ: >80 THEN RETURN 5888 
АФ-ІМРІ/7%(128,1):ЕФ-ІМРІТ%(128,1) 
DEVO$" MEM: ", REC, A$, ВФ: REC=REC+1 
IF RECEZ&HCO THEN 5128 
CLOSE #1:FRW O: INIT 
OFTION SCREEN B: CLS:RETLURN 
"ーーーーーーーーー 一 риш .一 ”一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 
FRW B8:CLS 
FRINT"[ SAVE 1" 
INPUT" FILE NAME ? (^/'-RETURN) ",T$ 
IF LEN(T$)716 THEN GOTO 6888 
IF T$="/" THEN RETURN 
OPTION SCREEN 4:FRW £HFF 
OFEN"O",1,T$:REC-8 
FRINT 41,88 
FOR I-8 TO 7 
PRINT #1,FAL (I) 
NEXT 
рЕУІФ"МЕМ: "КЕС, АФ, ВФ: РЕІМТЊ1, АФ: ВФ: 
REC=REC+1 
IF RECE&HCB THEN 5128 
GOTO 5158 
*ーーーーーーーーーー WIDTH チェ ウフ --------------------- 
INPUT #1,WI 
IF WIZ»88 THEN &558 
FOR І-8 TO 7 
INFUT # „РА (І) 
NEXT: RETURN 
GOSUB 5158 
PRINT"WIDTH IS NOT 80 '' (Push Any key) "; 
EY ま =TNEEY ま (1 ) 
RETURN 


1 シリ ー ズ 用 変更 リス ト | X」 シ リー ズ を 使う 場合 は 次 の 各行 を 変更 し ます 。 


20780 IF ХЕ>319 ОК ҮЕ>199 THEN 2000 


SCREEN 8,1,0 
FSET (XF, YF, CC) 


SCREEN 8,1,8 
FSET (ХЕ, YF, CC) 
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SS 


BOV 70727-70224 


Воч y EY РД, テク スチ ャ パタ ー ン 画面 上 に 描か れ た ピク セル 情報 を , НОСИ 
れ の 座標 値 へ 変換 させ ます 。 処理 エ リア は , 円 雛 の 側面 と 下部 の 円 面 の 2 通り に 分 けら れ ま す 。 

円 凶 の 側面 へ の マッ ピン グ 処 理 は , テク スチ ャ パタ ー ン 画面 上 に 描か れ た テク スチ ャ か ら , 必要 な 
パタ ー ン の 双方 向 の 長 さ を Lx, Y 方 向 の 長 さ を Ly, 円 雛 の 高 さ を 万 , PY 軸 に 垂直 な 面 の 切り 口 の 
円 の 半径 を LL と する と , マッ ピン グ 画 面 上 の X 方 向 の 倍率 SCx と , Y 方 向 の 倍率 SCy は , 次 の よ 
うに 表せ ます 。 

SC,-H/ Ly 
LL-J*SC,-R/H 
SCy= z LL Ly 
その 結果 . テク スチ ャ パタ ー ン 画面 上 の 1 点 (7 /) б ЖИЗ 2 F3 Бо OX, Px, P,) は , 次 の 
式 で 表す こと が で きま す 。 
PX — — LL cos 0 
Р--Н-/.Н/1, 
P,= LL sin 0 
だ た だ し 9 ニア グル * ァ (ラジ アン ) 
円 雛 の 底面 へ の マッ ピン グ は , 円 柱 の 底面 へ の マッ ピン グ と 同様 の 計算 式 な の で 省略 し ます 。 


スク リー ン 2 (X1 ター ボ の 場合 ) 
スク リー ン 1(X1 の 場合 ) 


(639,199) ^ 


- 


テク スチ ャ パタ ー ン 画面 ту К Ла 


4—16 РФ ФУ УКУ? 
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[= 
プロ グラ ム の 操作 方 法 この ブロ グラ ム を 入力 し て 実行 (RUN) させ 
る と , 画面 上 に , 


(SCREEN LOAD) 
FILE NAME ? 


と 聞い て くる の で , ЧИРИ ФО» EYS [н Ес, 画像 の デー タ の うち マッ ピン グ し た い 画 像 
の ファ イル 名 を 入力 し て くだ さい 。 読み込み が 完了 する と , マッ ピン グ 処 理 の た め の 物体 形状 の 記述 
に 入り ます 。 

画面 上 に は , 


エン スイ Z ハン ケイ 
エン スイ / タカ サ 


と 順次 聞い て くる の で , НОЕ (R) と 高 さ (H) を 入力 し て くだ さい 。 
次 いで スク リー ン 座 標 の どこ に 描く の か を 決定 し ます 。 画面 の コマ ンド 指示 に 従っ て , 次 の 値 を 入 
эсе 


た だ し , ВОІ, 底面 の 中 心 点 に と っ て ある の で , 画面 中 央 に 描き た い 場 合 は , その 位置 に 
注意 し て くだ さい 。 
次 いで , 


SCREEN X START = 
SCREEN X END 
SCREEN Y START 
SCREEN Y END 


と 聞い て くる の で , テク スチ ャ パタ ー ン 画面 の マッ ピン グ 表 示 領 域 を 決め て くだ さい (指示 領域 は 円 
柱 や 円 氏 の マッ ピン グ ・ ル ー チ ン と 同様 で す )。 
次 し 5%; 
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Жав マッ ピン ク グ 処 理 技術 


円 名 へ の マッ ピン グ 出力 例 


テク スチ ャ パタ ー ン 


4-17 ワー ルド 座標 プス クリ ー ン 座標 と 視線 の 関係 

と 聞い て くる の で , マッ ピン グ し た い エ リア の 指定 を 行っ て くだ さい 。 

例え ば , 側面 に 指定 する 場合 は [1] を キー イン する と マッ ピン グ が スタ ー ト し , 終了 する と 再び テ 
クス チャ パタ ー ン 画面 の マッ ピン グ 表 示 領 域 の ュ マ ンド に 戻る の で , 連続 し て 他 の 画面 に 処理 を 行い 
た い 場 合 は , 続け て 指定 し て くだ さい 。 

マッ ピン グ が 完了 する と , 
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(SAVE) 
EILE NAME ? (//'-RETURN) 


と 聞い て くる の で , 16 文 字 以 内 で ファ イル 名 を 付け て SAVE し て くだ さい 。 フ ァイル ・ デ ィ ス クリ 
プ タ を 指定 する と , それ ぞ れ の デバ イス に ファ イル が 可能 で す 。 


qasa プロ グラ ム の 組み 立て は , 116 ペ ー ジ の 円 柱 の 
| | ブログ ラム の 内 容 | мен | 
場合 と ほぼ 同じ な の で , 参照 し て くだ さい 。 


EERS 


図 4 一 !8 マッ ピン グ エ リ ア の 指 


М 
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la か ヨード 
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マッ ピン グ 用 画面 の 左端 


XO スク リー ン 中 央 の 位置 ( X 座 標 ) マッ ピン グ 用 画面 の 上 端 
YO スク リー ン 中 央 の 位置 ( Y ES) マッ ピン グ 用 画面 の 右端 
STP — マッ ピン グ 用 画面 の 下端 
STP1 マッ ピン グ 位 置 の カラ ー 
PC カラ ー コ ー ド スク リー ン X 方向 の 移動 
PX 物体 の 位置 ( X 座 標 ) スク リー ン Y 方 向 の 移動 
РҮ 物体 の 位置 ( Y 座 標 ) 物体 の X 軸 に 対す る 回 転 
| PZ 物体 の 位置 座標) 物体 の Y 還 に 対す る 回 転 
XP 3D 変換 後 の ス クリ ー ン ( XER) 物体 の Z 軸 に 対す る 回 転 
YP 3D 変換 後 の ス クリ ー ン ( Y 座 標 ) 


НЕ” yery 


テク スチ ャ パタ ー ン 
画面 LOAD 


マッ ピン グ 
物体 ( 门 锥 ) の 半径 , 高 さ 入力 


3D 変換 入力 


Fist 
|| WIRE FRAME 描く 
マッ ピン グ 条 件 設定 


プロ グラ ム の 流れ 


PROMESO 
マッ ピン グル ー チ ン 


月 锥 0 底面 人 0) 


マッ ピン グル ー チ ン 


メニ ュー 表示 


画面 SAVE 


画面 LOAD 
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SOCUX * 
5 "Ж MAFFING ~ CONE gak: * 
4 "x Ж 
Š Ж Frogrammed Ey [L SñIMU 1 * 
ó "X * 
7 ^X 1985 . 4 。 1 x 
gx Ж 
© *ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ 
IOD T “ーーー デーーーーーーー P Aa PYTA а а 


118 ELIST Ө: ОРТІОМ SCREEN G:WIDTH 80, 25,0, 


128 DIM FAL (7) 
138 XQ-2280: Y0-1800:STFP-z180:STF1-38 
148 PUR I=Ə TO 7: м отн МЕХТ 


ЫВ: T ее rin Ru zs з ーーーーー ニ ーーーーーー デ ーー 


218 SCREEN 2,2, 8: GOSUB 4888 

22380 SCREEN 8,8,80: GOSUR 18860: GOSUB 8808 
230 IF РС= THEN 258 

z480 COLOR FC:GOSUE 15080 

2580 COLOR 7 :GDSUE 280808 

2680 FRW G:CLS:PRINT "LMAFFIMG FILE 1" 
270 PRINT " 1. SCREEN SAVE" 

288 FRINT " 2. SCREEN LOAD" 

2989 PRINT ú 3. END” 

ЖӨӨ PRINT " Fush Key 1 OR 2 OR 3 "3 
518 Аж-ІМЕКЕҮ%Ж(1) 

328 ON INSTR("12Z",0$) GOSUB 568,578, 25408 
338 GOTO 318 

3480 INIT:END 


680 GOSUE é68080:GOTO 260 

3780 BUSUE SB BHT 268 

1880; で ーーー ニ ーー ニーーーー エンマ 2 EA ЭЛҮ ニョ ウリ ョ ツ 
1818 CLS 

1828 INFUT "тоза 2 nv74 = "R 

1858 IF К<=6 THEN 18808 

1848 INFUT "тол 2 ЭЛТ = ",.H 

18958 LIF Hi= THEN 1646 ELSE RETURN 


1908 "ーーーーーー デ ーー デー エッ マイ 9 ІТ 一 一 一 一 一 一 一 一 一 一 一 


1518 FRW НЕЕ 

15280 PFX-R:FYzB:FZz80:G05UBR 5508 

15838 LINE (XP, YP ХР, YP),PSET,PC 

1548 FOR TH=B TO 368 STEF STF 

1550 FXzRXCOS (КАр(ТН)) Р?-“КжБІМ(КАр(ТН)) 
1560 GOSUB さら BsLTNE - (ХР, ҮР) 

1578 NEXT 

168080 FOR TH=B TO 258 STEF STF1 

1618 FXzBO:PY-H:PFZ-8:GO0SUR 7500 


ШҮ w ET: ZL125SA U AP 


gs CLS 


= 
1620 LINE (XF,YF)-(XF, YF) , PSET,PC 


16308 
1648 
1658 
1 66 日 
28088 
2018 
28028 
2039 
20940 
2858 
2068 
2078 
28088 
28989 
2188 
2118 
2128 
2138 
2148 
2198 
2160 
2178 
2188 
219 
2288 
22180 


"МООС 
aL aL aL 


2228 


2240 
2250 
2260 
2270 
2280 
2299 
2389 
2310 
人 


ж-да. 

X8 
2349 
2350 
2368 
2909 
2518 
2920 
293] 
29240 
2558 
2568 


で コア 日 
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FX メニ RKCUHS КАР (TH) ) : РУ=9: ドア テーR* ま STN(RRD (TH) ) 
GOSUB 3S88:LINE ~ (ХЕ, ҮР» 
NEXT 
FRW Oz: RETURN 
>.......... yk? 70" 用 一 于 -一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 
LOCATE 8,9 
INFLIT'SCREEN X START- ", XS 
INFUT"SCREEN X END = "XE 
INFUT"SCREEN Y START= ",YS 
INFUT"SCREEN Y END = ",YE 
IF X5z80 OR YS THEM 28008 
IF ХЕ>:629 OR YE219?9 THEN 289868 
IF XS-XE OR YS-YE THEN 28860 
LX-XE-XS:LY-zYE-YS 
FPRINT:FRINT"MAFFING AREA" 
FRINT" de WOW 
FRINT" Sa テイ メッ " 
PRINT" Za END " 
АФ-ІМКЕҮФ(1) 
IF АФ-"1" ОК А%="2" THEN 2178 
IF A$=" 3" THEN RETURN ELSE 2148 
FRW EHFF:MS-zVAL(GCAS) 
ам MS GOSUE 220868, 2500 
FRW ө: БОТО 29009 
ーーーーーーーーーー マリ ヒヒ 5 52" әл (VD) 一 一 一 一 一 一 一 一 一 一 一 
ЕКЫ &HFF 
SCY-zH/LY 
IF SCYZ1 THEN STFZ2-1 ELSE STFZ2z1/SCY 
IF SCX«z1 THEN GTFP マ =1 ELSE STF3z1/SCX 
FOR J1/8CY TO LY STEF STFZ2 
FYzH-JXSCY:LL-Z-JKSCYXR/H: SCXzFAI (GL) /LX 
FOR LB TO LX STEF STFZ 
SCREEN 8,2,8 
CCsSFOINTCINT(OXS--Ic-.S9S)0,INT(CYS-J4.5)) 
SCREEN 8,0,68 
FX-—-LLXCOS(FAICI/LX)):FZzLLXSIN(GP"AICI/LX)2) 
GOSUE 25089 
FSET (XF,YP,CC):PSET (XFP+1。YF'、CC) 
NEXT 
NEXT 
RETURN 
ыы аа жна. ub? 520" uma (МР) eee e me mee mee mee me me mee mae 
FRW ЕНЕР 
SCY=2xXR/LY:FY=0 
IF SCY<1 THEN STF2-z1 ELSE STF2-1/SCY 
IF SCX«1 THEN STFZz1 ELSE STPZz1/8CX 
FOR J-1/8U0Y TO LY STEP STF2 
PXzcR-JXSCY:RI-cSQOR(ORXR-PFXXFX) 
SCX-2XR1/LX 
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25809 
2599 
265088 
2618 
2628 
2650 
2640 
265 
2660 
z008 
3016 
га 
38939 
2040 
z050 
1860 
19870 
3088 
5090 
21180 
2110 
2580 
3518 
3928 
5550 
2540 
55509 
2560 
39708 
2580 
48980 
4810 
489028 
4820 
40409 
48580 
48069 
4070 
4088 
4898 
418098 
4118 
4129 
4138 
5151615) 
58018 
59029 
58038 
580489 


380398 


FOR I«8 TO LX STEF БТЕ 


SCREEN 9,2,8 
CC=FOINT(OINT(XS+I+.5), INT(YS+J+, 5) ) 
SCREEN 日 ,日 ,日 
PZ-R1-IKSCX:G0SUB 3500 
FSET (XP,YF,CCO):PSET (XF1,YP,CC) 
NEXT 
NEXT 
RETURN 
*ーーーーーーーー ニ ーー SD “anyo ニュ ウリ ョ ク --------------- 
INFUT"X —— MOVE = ",MVX 
INFUT"Y -- MOVE = ",MVY 
INFUT"X -- ANGLE = ",RTX 
INFUT"Y -- ANGLE = ",RTY 
INFUT"Z -- ANGLE = ",RTZ 
S8-SIN(GAD(RTX) ) : CS=COS (RAD (КТУ) ) 


SF=SIN(RAD(RTY) ) : CFzCOS (Кар (RTY) ) 
SF=SIN(RAD(RTZ)):CF=COS(RAD(RTZ) ) 


INFUT" Color: = * PG 

IF (РС<Ә)--ХЕС>7) THEN 350908 

RETURN 

? 一 一 一 一 一 一 一 一 一 一 mD / SA fu ———— а н нон 


ХР=РХЖСЕЖСЕ+РҮЖ (SSXSFXCF-CSXSF) 
XF=XF+F Z% (CS*XSFXCF+SSXSF) 
YPZPXXCFEKSP-PYX (SSXSFXSF+CSXCF) 
YF=YF+F ZX CCSKSFXSP-SSXCF) 
ZPz-PXXSF-PYXSSXCF-PZXCSXCF 
XP-zXO-XFX2--MVX 

YF=YD-YF-MYY 


F 一 一 一 一 一 一 一 一 一 一 マウ リー рир 2 Deb“ ーーーーーーーーーーーーーー 


CLS:PRINT"L SCREEN LOAD 1" 
INFUT" FILE NAME ? ",T$ 
IF LEN(T$)>1 THEN 4888 
OFTION SCREEN 4:PRU $&HFF 
ОРЕМ"І", 1, ТФ: КЕС=0 
GDSUB &6500:1F WIz280 THEN 4000 
АФ=ІМРОТФ (128,1) : ВФ=ІМРОТФ (128,1) 
рЕУОФ"МЕМ1: ", КЕС, A$, ВФ: КЕС=КЕС+1 
IF КЕС<%НСӨ THEN 4878 
CLOSE &1:PRW Ө: INIT:OPTION SCREEN Ө 
FOR I-8 TO 7 

FALET І, РАШ (I) 


---------- “л 2 ロート" -------------------- 


CLS:FRINT"E LOAD 1" 

INFUT" FILE NAME ? (*/"zRETURND ",Т% 
IF LEN(T ま ) 216 THEN S888 

IF T$-"/" THEN RETURN 

GOSUB $5898 
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5860 FOR Іс8 TO 7 

S878 PALET І,РА (I) 

5088 NEXT: RETURN 

5898 OPTION SCREEN 4:FRM НЕЕ 

5188 OFEN"I",.1,T£$:REC-8 

5110 GOSUE 6500:1F WIz280 THEN RETURN 5888 
5128 A$-INFUTS((128,1):B$-INPFUT$(128, 1) 
5158 DEVO$"MEM:", REC, A$, B$:REC=REC+1 

51480 IF RECZ&£HCB THEN 5128 

5158 CLOSE #l:FRW Ө: INIT 

5168 OFTION SCREEN G:CLS: RETURN 

GUB '——————— ТҰ, 2 セーフ" -------------------- 
68010 FRM 日: CLS 

6820 PRINT"[ SAVE 1" 

6820 INPUT" FILE NAME ? ('/'-RETURN) ",T$ 
6848 IF LEN(T$)?16 THEN GOTO 6888 

6D5B8 IF T$="/" THEN RETURN 

6B6 OFTION SCREEN 4:PRW НЕЕ 

68780 OFEN"O",1,T$:REC-B 

6088 PRINT #1,80 

5898 FOR Is8 TO 7 

6100 . PRINT #1,РА (1) 

6118 NEXT 

61280 ПЕУІФ"МЕМ: "КЕС, АФ, ВФ: РКІМТЊ1, А: ВФ; 
8158 КЕС=КЕС+1 

6140 IF RECZEHCB THEN 6120 

6158 GOTO 5150 

6498 ”一 一 一 一 一 一 一 一 一 一 WIDTH チェ ウリ --------------------- 
658080 INFUT *1,UI 

65180 IF WIZ2880 THEN 6558 
6528 FOR I-8 TO 7 

6538 — INFUT #1,РА (1) 
6540 NEXT: RETURN 

6558 GOSUE 5150 

6568 PRINT"WIDTH IS NOT 88 !! (Fush Any key) "; 
5570 EYS-INKEYS (1) 
6588 RETURN 


_X1 シリ ー ズ 用 変更 リス ト X] シ リー ズ を 使う 場合 は 次 の 各行 を 変更 し ます 。 


2878 IF XE^Z19 OR YE>199 THEN 2080 


2288 SCREEN 8,1,8 
2330 FSET (XP, YF, CC) 
2598 SCREEN 8,1,8 
2638 FSET (XF, ҮР,СС) 
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| 直 太 体 へ の マッ ピン グ ・ ブ ログ ラム | 


直方 体 へ の マッ ピン グ 処 理 は , テク スチ ャ バター ン 画 面 上 に 描か れ た ピク セル 情報 を , 直方 体 の そ 
れ ぞ れ の 座標 値 へ 変換 させ ます 。 処理 エ リア と し て は , 直方 体 の 正面 , 立 面 , 側面 の 3 通り に 分 けら 
КЕТ, 

直方 体 の マッ ピン グ 処 理 は ,。 テク スチ ャ パタ ー ン 画面 上 に 描か れ た テク スチ ャ か ら , 必要 な パタ ー 
ン を それ ぞ れ 直方 体 の 正面 , 立 面 , 側面 の 各 四 角形 に 対応 させ て 表し ます 。 

テク スチ ャ パタ ー ン 画面 上 に 描か れ た テク スチ ャ か ら , 必要 な パタ ー ン の 双方 向 の 長 さ を Lx Y 
方 向 の 長 さ を Ly 直方 体 の 縦 の 長 さ を 万 , ЖОН АЖ, 奥行 を D, マッ ピン グ 画 面 上 の 双方 向 の 
倍率 を SC. Y 方 向 の 倍率 を SC テク スチ ャ パタ ー ン 画面 上 の 1 点 (7 J) に 対応 する 面 上 の 点 
(Px, Px, P) は それ ぞ れ 次 の よう に 表現 する こと が で きま す 。 
信正 面 へ の マッ ピン グ の 場合 

SC= W / Lx 
2. 

これ に より , 次 の 式 が 導 か れ ま す 。 
Bil + SG, 
Р,-Н-/.5С, 

P;2D 
⑧ 立 面 へ の マッ ピン グ の 場合 
2. 


SC マニ カン ん 


スク リー ン 2(X1 ター ボ の 場合 ) スク リー ン 0 
スク リー ン 1(X1 の 場合 ) 


(639, 199)... 


テク スチ ャ パタ ー ン 画面 マッ ピン グ 画 面 


- 


[4—19 直方 体 へ の マッ ピン グ ( 正 面 へ の 例 ) 
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これ に より , 次 の 式 が 求め られ ます 。 
P,= + SC, 
PeH 
Bf «5б. 
る ⑧ 側 面 へ の マッ ピン グ の 場合 
SC D Z Lx 
2. 
これ に より , 次 の よう に 表す こと が で きま す 。 
P,= W 
Р,=Н-р + SG 
P,=D—I + SC, 


—— ———— кг この プロ グラ ム を 入力 し て 実行 (RUN) させ 
| プロ グラ ム の 操作 方 法 sk ELE 


(SCREEN LOAD) 
FILE NAME ? 


と 聞い て くる の で , 円 柱 等 の マッ ピン グ ・ プ ログ ラム と 同様 , 画像 デー タ の うち マッ ピン グ し た い 画 
像 の ファ イル 名 を 入力 し て くだ さい 。 

読み 込み が 完了 する と , マッ ピン グ 処 理 の た め の 物 体形 状 の 記述 に 入り ます 。 

画面 上 に は , 


タテ ノ ナガ サ = 


ョ コノ サナ ガサ 
タカ サ 


と 順次 聞い て くる の で , 直方 体 の 縦 の 長 さ (D), 横 の 長 さ OD, 高 さ (H) を 入力 し て くだ さい 
(この 場合 は , 直方 体 は 絶対 座標 系 の 正方 向 の 3 面 だ け 描 く よ う に し て ある の で 注意 し て くだ さい )。 
次 いで , スク リー ン 座 標 の どこ に 描く の か 決定 し ます 。 円 柱 等 の マッ ピン グ ・ ル ー チ ン と 同様 に 画 
面 の コマ ンド 指示 に 従っ て , 次 の 値 を 入力 し て くだ さい 。 


X— MOVE = 
Y— MOVE = 
X—— ANGLE = 
Y— ANGLE = 
Z——ANGLE = 
COLOR 


Кее, 
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SCREEN X START 
SCREEN X END = 
SCREEN Y START 
SCREEN Y END = 


と 聞い て くる の で , テク スチ ャ パタ ー ン 画面 の マッ ピン グ 表 示 領域 を 決め て くだ さい (指示 領域 は 他 
の マッ ピン グル ー チ ン と 同様 で す )。 
次 いで , 


ショ ウメ ン 
リツ メン 
ソ ツク メン 
END 


+ (9 MN nm 


と 聞い て くる の で , マッ ピン グ し た い エ リア の 指定 を 行っ て くだ さい 。 

例え ば , 正面 に 指定 する 場合 は , 1] を キー イン する と マッ ピン グ が スタ ー ト し , 終了 する と 再び 
テク スチ ャ パタ ー ン 画面 の マッ ピン グ 表 示 領 域 の ュ マ ンド に 戻る の で , 連続 し て 他 の 画面 に 処理 を 行 
いた い 場 合 は , 続け て 指定 し て くだ さい 。 


図 4 一 20 ワー ルド 座標 スク リー ン 座 標 と 視線 の 関係 
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マッ ピン グ が 完了 する と , 


(SAVE) 
FILE NAME ? (//'—RETURN) 


と 聞い て くる の で , 16 文 字 以 内 で ファ イル 名 を 付け て SAVE し て くだ さい 。 フ ァイル ・ デ ィ ス クリ 
プ タ を 指定 する と , それ ぞ れ の デバ ベイ ス に ファ イル が 可能 で す 。 


quus プロ グラ ム の 組み 立て は , 116 ペ ー ジ の 円 柱 の 
| " フロ グラ ム の 内 容 P xr. | 
場合 と ほぼ 同じ な の で , 参照 し て くだ さい 。 


4 一 2| マッ ピン グ エ リ ア の 指定 
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テク スチ ャ パタ ー ン 


テク スチ ャ パタ ー ン 
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マッ ピン グ 用 画面 の 左端 
マッ ピン グ 用 画面 の 上 端 
マッ ピン グ 用 画面 の 右端 
マッ ピン グ 用 画面 の 下端 
マッ ピン グ 位 置 の カラ ー 
スク リー ン X 方 向 の 移動 
スク リー ン Y 方 向 の 移動 
物体 の X 軸 に 対す る 回 転 


スク リー ン 中 央 の 位置 ( X 座 標 ) 
スク リー ン 中 央 の 位置 ( YES) 


直方 体 の 正面 へ の 
| マッ ピン グル ー チ ン 
ІІ | | 直方 体 の 立 面 へ の 
- -一 || マッ ピン グル ー チ ン 
"Md テク スチ ャ バタ ー ン ーー 
。 || 画面 LOAD || 直方 体 の 側面 へ の 
| | て ノビ ング ルー テン 


マッ ピン グ ク 物 体 (直方 体 ) 
OK, ж, 高 さ 入力 


画面 SAVE 
- 画面 LOAD 


直方 体 O 
WIRE FRAME ## < 
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直方 体 マ ッ ピ ング * プロ グラ ムリ スト 


1 ?*ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ 
2 7% Ж 
a *Ж MAFFING - FLANE gak * 
4 cx Ж 
E “Ж Frogrammed Бу C SAIMU J x 
б "x * 
7 "x 1985 . 4 < 1 * 
8x * 
9 *ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ 
100 ”一 一 一 一 一 一 一 一 一 一 T" cR CB е-е eene eek ceo neas ene eire 


11 KLIST GO:O0FTION SCREEN BiMIDTH 88,295,0,0:CL& 

128 DIM FAL (7) 

138 X0-228:Y0-z108:S8TF-180:S8TF1-i8 

148 FOR I= TO 7:FAL(I)-I:NEXT 

200 "енен CP ME S ME S S лме наше чынг нра нн ни өза 
2180 SCREEN 2,2,0: 50508 48898 

220 SCREEN 8,8,0: GOGSUE 18890: GOSUE 7000 

258 IF FC-80 THEN 250 

248 COLOR FC:GOSUR 15009 

258 COLOR 7 :6GOSUB 20800 

2680 РКИ G:CLS:FRINMT "LMAFFING FILE 1" 

2780 PRINT " 1. SCREEN SAVE" 

288 PRINT " 2. SCREEN LOAD" 

2980 PRINT " 3. END" 

ЖӨӨ FRINT " Fush Key 1 OR 2 OR 3 '"; 

310 АФ-ІМКЕУ%Ж(1) 

32808 ОМ INSTR("1232",0$) GOSUE 568,378, 340 

558 БОТО 310 

548 INIT:END 

AUC 人 

568 GOSUB 5000: БОТО 268 

378 60508 58808:GOTO 268 

THOR fee FITRIA q^ ニコ ウリ ョ ジン ニーーーーー デ ーーー の mm ツー 
1810 CLS 

1020 1NFUT "27 Z ТУУ = "pD 

1858 IF DZ-8 THEN 168018 

i840 INFUT "ал 2 Tn" = ",W 

1858 IF Wz-&à THEN 10948 
1860 INFUT "791 

1878 IF Hz-B8 THEN 18658 


" 
还 


1588 '---------- チョ ウホ ウタ 9 ІП"? ----------------- 
1518 PXz8:PY-H:PZ-D:GOSUB 3588 

1520 LINE(XF,YF)-(XF, YF) , FSET, FC 

1558 PX-W:GO0SUB 2500:11МЕ- (ХР, YF) 

1548 PZ-8:G60SUR Z500:LINE- (XF, YF) 

1558 PX-8:608UB 25808:LINE-(XP, YF) 

15868 FZ=D: GOSUE 3580:LINE-(XF, YF) 

1578 PY-8:60SUB Z588:LINE-(XF, YF) 

1580 PX-W:GOSUB Z508:LINE-(XF, YF) 

1590 PY-H:GOSUB 3588:LINE- (XP, YF) 


16808 
1618 
1628 
1638 
2888 
2018 
2020 
20389 
2040 
28508 
2868 
28078 
2088 
2898 
218098 
2118 
2128 
2138 
2148 
2158 
2168 
2170 
2180 
2198 
22808 
2218 


тууу 
Dow ws 


24108 
2428 
24x 
2448 
2458 
2468 
2478 
2480 
2490 
2500 
2510 
2528 
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PY-O:GOSUBR ZSOB:LINE(OXXF,YFO-(OXP, YF), РЕТ, ЕС 
PZ-80:GO0SUB Z5808:LINE-(XF, ҮР) 

FY=H: GOSUE ZS588:LINE-(XF, YF) 

RETURN 

ーーーーーーーーーー туе リフ" ф-Жу ------------------- 
LOCATE 8,9 

INFUT"SCREEN X START- ",XS 


INFUT"SCREEM X END = ",XE 
INFUT"SCREEN Y START= ",YS 
INFUT"SCREEM Y END = ",YE 


IF Х8<8 OR YSJ THEN 2088 
IF ХЕ>059 DR ҮЕ>199 THEN 2080 
IF Х5>ХЕ OR YSZYE THEN 2880 
PRINT:PRINT"MAPFPING AREA" 
PRINT" 1. vans" 
PRINT" 2. ушур, " 
PRINT" 2. улл" 
PRINT" 4. END " 
A$S-INEEYS(DO 
IF A$-"i" DR АФ-"2" OR A$-"Z" THEN 2178 
IF A$-"4" THEN RETURN ELSE 2140 
PRW &HFF:MS-VAL (A$) 
ON MS GOSUE 22090,2400, 2200 
FRW Ө: БОТО 2080 
*ーーーーーーーーーー ブリ ヒッ の "ルー キー (uaüsu) ----------- 
РЕШ &HFEF 
LXSXE-XS: LYzYE- YS: SCX-W/LX: SCYsH/LY:PZ-D 
IF SCYz1 THEN STF2=1 ELSE STP2-1/8CY 
IF SCXz1 THEN STPZ-1 ELSE STPZ-1/SCX 
FOR J-8 TO LY STEF STP? 
PYzH-JKSCY 
FOR І=0 TO LX ӨТЕР ТРЕ 
SCREEN 8,2,0 
CC-POINT(INT(OGS*I*.5), INT(YS+J+, 5) ) 
SCREEN 0,0,0 
PX-IXSCX:GOSUE 3500 
PSET (ХР,ҮР,СС):РБЕТ (ХЕ+1, ҮЕ, СС) 
МЕХТ 
МЕХТ 
RETURN 
"ーーーーーーーーーー  "wk*uj2)" ルー チン フー (QUAL) ------------ 
FRW &HEF 
LXsXE-XY:LYzYE-YS: SCXzW/LX: SCYsD/LYs:FY«H 
IF SCYz1 THEN STP2-1 ELSE STPZ2-«1/8CY 
IF SCXz1 THEN STPZ-1 ELSE BTF さ =1/SCX 
FOR J«8 TO LY STEP STP? 
PZ-JXSCY 
FOR I= TO LX STEF STPZ 
SCREEN 8,2,0 
CC=FOQINT(INT(XS+I+. 5), INT(YS+J+.5)) 
SCREEN 8,0,0 
PX-IXSCX:GOSUB 3500 
FSET (ХР,ҮР,СС):РБЕТ (ХЕ+1, ҮР, CC) E 
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140 


259538 
2548 
2590 
26808 
2618 
2628 
26389 
2648 
265 
2660 
26789 
2688 
2698 
2708 
2718 
2728 
2738 
2748 
2758 
i808 
5818 
38028 
3838 
38048 
38058 
3868 
3078 
3888 
3898 
i188 
5118 
35808 
5818 
39528 
3838 
5540 
35998 
3568 
3378 
3588 
48808 
48018 
4028 
4820 
48048 
48358 
48068 
48078 
4888 
48908 
41808 
4118 
4128 


NEXT 
NEXT 
RETURN 
”一 一 一 一 一 一 一 一 一 一 таре 1705 ルー キー ルー (リウ メッ) 一 一 一 一 一 一 一 一 一 一 一 一 
FRW “НЕЕ 
LX-XE-XS:LYzYE-YS: SCXzD/LX: SCY-H/L Y:F X=W 
IF SCYz1 THEN ЅТЕ2=1 ELSE STF2-1/SCY 
IF SCX«1 THEN STF2Z=1 ELSE STF さ =1/GCX 
FOR JG TO LY STEF STFZ2 
FYzH-JXxSCY 
FOR I-O8 TO LX STEF STPS 
SCREEN 8,2,8 
CC-FOINT(CINT(OXS-I-.S50,INT((YSTI4. 32) 
SCREEN 日 ,日 ,日 
FZzD-IXSCX:GOSUR 55090 
PSET (XP YFL ER FSET (AF Fia ҮР» CGI 
NEXT 


шаа а ы асы. Ар yaga ニュ コウ リョ ダグ 。 ーー ニー ニーーーーー デ ーーー デ ーー デー 
INFUT"X —— MOVE = ",MVX 

INFUT"Y ~~ MOVE "арқ 

INPLT"X ーー ANGLE = ",RTX 

INFUT"Y ~~ ANGLE = ",RTY 

INFUT"Z ーー ANGLE = ",RTZ 
SS-SINGORAD(ORTX) ) CGzCOS (Кар (RTY) ) 

ЗЕ=5ІМ (КАР (ЕТУ)  : CFzCOS (Кар (КТУ) ) 
ЅЕ=5ІМ‹КАР (КТА) ) : СЕ=СОЅ Кар (КТЕ) ) 


ii 


INPUT" Color = ",FC 

IF (РС<Ө)-(РС>7) THEN 3898 

RETURN 

*ーーーーーーーーー 一 ZD 2 T4uL Н 


ХР=РХЖСЕЖСЕ+РҮЖ (SSKSFXCF-CSKSF) 
XF=XF+FZk CSXSFXCF-SSXSP) 
ҮР-РХЖСЕЖӘР-РҮЖ (SSXSFXSF+CSXCF) 
YF=YF+F ZX (CSKSFKSF-SSXCF) 
ZP--PXXSF-PYXSSXCF4PZXCSXCF 
XP2XO0-XFX2-MUX 
ҮР-ҮП-ҮР-МУҮ 
RETURN 
*ーーーーーーーーーー マウ リー- "лу / ロー ト " е 
CLS:FRINT"[ SCREEN LOAD 1" 
INFUT" FILE NAME ? ",T$ 
IF LEN(T$) >16 THEN 4888 
OFTION SCREEN 4: FRW £HFF 
OFEN"I",1,T$:REC-B 
GOSUB &518:1F МІС >80 THEN 4000 
АФ=ІМРОТФ (128,1) : BE-INPUT$ (128, 1) 
рЕУОФ"МЕМ1: ", КЕС, АФ, В%: КЕС=БЕС+1 
IF КЕС<%НСӘ THEN 4070 
CLOSE #1:FRM 0: INIT:OFTION SCREEN Ө 
FOR 1= 昌 TO 7 

FALET І, РА (I) 


4138 
3889 
38018 
5020 
3038 
3840 
5050 
3860 
30768 
3888 
3809 
3188 
3118 
3128 
S138 
5148 
5159 
3168 
68098 
58186 
6028 
6038 
68048 
68058 
6868 
68078 
6889 
898 
6188 
6116 
6128 
6130 
61480 
6150 
өзге 
6518 
6528 
6338 
6348 
65909 
6 らら 6 
6578 
6388 
6570 


GOSUE 5150 

PRINT"WIDTH IS NOT 88 !! (Fush Any key) "; 
EYS-INEEYS (1) 

RETURN 

シリ ー ズ 用 変更 リス ト 2078 IF ХЕ>3519 OR ҮЕ>199 THEN 28608 


ХІ 


第 4 章 マッ ピン ク グ 処理 技術 


NEXT: RETURN 
?一 一 一 一 一 一 一 一 一 一 пол, 加 一 ”一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 
CLS:FRINT"E LOAD 1" 
INFUT" FILE NAME 7 (*/*-zRKETURND ",T* 
IF LEN(CT$) >16 THEN 3088 
IF Т%х"/" THEN RETURN 
GOSUR 28998 
FOR I8 TO 7 

FALET I.,FAL (I) 
NEXT RETURN 
OFTION SCREEN 4: FR %HFF 
OFEN"I",.1,T$:REC-8 
GOSUR 6510:1IF MIEEB THEN RETURN 59009 
АФІМРОТ%(128,1):ЕФ-ІМРІІТ% (128,1) 
БЕУОФ"МЕМ: " „КЕШ, АФ, ЕФ: КЕС-КЕС-1 
IF RECE£&HCB8O THEN 5128 
CLOSE #1:FRW GO: INIT 
OFTION SCREEN Ө: С 5: RETURN 
?一 一 一 一 一 一 一 一 一 一 ло, 和 一 3 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 
FRU G: CLS 
FRINT"L SAVE 1" 
INFLIT" FILE МАМЕ ? ("/'zRETURhD ",Т% 
IF (ЕМ(ТФ) >16 THEN 6898 
IF T£$z"/" THEN RETURN 
OFTION SCREEN 4:FRW ЕНЕР 
OPEN"O",1, T$: КЕС=0 
PRINT 81,88 
FOR I TO 7 

FRINT жі, РА (I) 
NEXT 
ПЕЧІФ"МЕМ: ", REC., A$, B$:FRINTHI, АФ: ВФ; 
КЕС-КЕС1 
IF RECZ£EHCO THEN 6128 


---------- WIDTH FIYI --------------------- 
INFUT #1,WI 
IF MIESB THEN 6568 
FOR 1=8 TO 7 
INPUT #1,РА СІ) 
NEXT: RETURN 


NETZE EE 5 

各行 を 変更 し ます 。 == s YF, CC 
2480 SCREEN 8,1,0 
2528 РЅЕТ (XP, YF, CC) 
2688 SCREEN 8,1,8 
27208 PSET (ХР, YF, CC) 
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回 転 体 へ の マッ ピン グ ・ ブ ログ ラム 


5. D 


回 転 体 へ の マッ ピン グ 処 理 は 。 先 の 4 例 と 同様 に テク スチ ャ パタ ー ン 画面 上 に 描か れ た ピク セル 情 
報 を , 回 転 体 の それ ぞ れ の 座標 値 へ と 変換 させ ます 。 

回 転 体 は , 半径 の X 座 標 と 高 さ の Y 座 標 を 。 それ ぞ れ R ), RyC ) に 代入 し , 同時 に 長 さ を 
計算 し , RLC ) に 代入 し , 形状 記述 し ます 。 

回 転 体 へ の マッ ピン グ 処 理 は 。 テク スチ ャ パタ ー ン 画面 上 に 描か れ た テク スチ ャ か ら 必 要 な パタ ー 
ン の 叉 方向 の 長 さ を Ly Y 方 向 の 長 さ を Lyr, 回 転 体 の 半径 を Rx(K), Y 座 標 を RyCK) (た だ し 
Ру(К) は , 最初 の 点 か らち トータル な 長 さ を 表し ます ), また , 最初 か ら 最後 まで の 長 さ を , 

L(= RLCN —1)) た だ し N は 個数 
と 表す と , 
SCx= x RU Ly 
SCY-L/ Lx 
LL-L-J • SG 
と 書き 表す こと が で きま す 。 

LL が K と が 一 ] 番目 の 間 に あ る を 求め る と, 

P, PGK—D-4 GSyCK)— RyCK—1)) (ルー RLCK 1)7 (RLCK) - RLCK —1)) 

半径 R は , 

R= R,(K—D + Gy CK) - РСК D CLL-— RLCK —1))/ CRLCK) - RLCK —1)) 
また , 


P,= — R, cos 0 
スク リー ン 2(X1 ター ボ の 場合 ) スク リー ン 0 
スク リー ン 1 (X1 の 場合 ) R.K) " RL(K)—RL(K—1) 
(0, 0) WT lii ssp 


) 


Зыр. Cy жне X 
~~ (639,199) ~ 


テク スチ ャ パタ ー ン 画面 マッ ピン グ 画 面 


4 一 22 回 転 体 へ の マッ ピン グ 
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P;—R,sin 0 
kEUO-I/LX-*z (ラジ アン ) 
と 表す と と が で きま す 。 
この プロ グラ ム を 入力 し て 実行 (RUN) させ 
る と , 画面 上 に , 


プロ グラ ム の 操作 記法 


(SCREEN LOAD) 
FILE NAME ? 


と 聞い て くる の で , 他 の マッ ピン グ ・ プ ログ ラム と 同様 に , 画像 デー タ の うち マッ ピン グ し た い 画 像 
の ファ イル 名 を 入力 し て くだ さい 。 読み込み が 完了 する と , マッ ピン グ 処 理 の た め の 物 体形 状 の 記述 
に 入り ます 。 

画面 上 に は , 


4-23 ワー ルド 座標 / ゾ スク リー ン 座 標 と 視線 の 関係 
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と 聞い て くる の で , Y 軸 を 中 心 と し た 回 転 す る 点 の 座標 位置 を , 点 の 番号 UND 原点 か ら の 高 さ 
(H$), 原点 か ら の 距離 一 半径 (R) を 順次 入力 し て くだ さい 。 回 転 体 の 点 は , 100 個 まで 入力 が 可 
能 で す 。 入 力 が 終了 する と, [キー を 入力 し て くだ さい 。 

次 いで , スク リー ン 座 標 の どこ に 描く の か 決定 し ます 。 前述 の マッ ピン グル ー チ ン と 同様 に , コマ 
ンド 指示 に 従っ て , 次 の 値 を 入力 し て くだ さい 。 


SCREEN 
SCREEN 
SCREEN 
SCREEN 


と 聞い て くる の で , テク スチ ャ パタ ー ン 画面 の マッ ピン グ 表 示 領 域 を 決め て くだ さい (指示 領域 は , 
前 述 の マッ ピン グル ー チ ン と 同様 で す )。 指 示 に 従っ て , マッ ピン グ 処 理 が 回 転 体 の 上 面 か ら 開始 さ 
れ ま す 。 


図 4 一 24 回 転 体 へ の マッ ピン ク 処 理 
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マッ ピン グ が 完了 する と , 


(SAVE) 
FILE NAME ? (//'—RETURN) 


と 聞い て くる の で , 16 文 字 以 内 で ファ イル 名 を 付け て SAVE し て くだ さい 。 フ ァイル ・ デ ィ ス クリ 


プ タ を 指定 する と , それ ぞ れ の デバ ベイ ス に ファ イル が 可能 で す 。 
プロ グラ ム の 組み 立て は , 116 ペ ー ジ の 円 柱 の 


i 
| プロ グラ ム の 内 容 nd 場合 と ほぼ 同じ な の で , 参照 し て くだ さい 。 


回 転 体 へ の マッ ピン グ 出力 例 


テク スチ ャ パタ ー ン 


テク スチ ャ パタ ー ン 
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マッ ピン グ 用 画面 の 下端 
マッ ピン グ ク 位置 の カラ ー 
スク リー ン X 方 向 の 移動 
スク リー ン Y 方 向 の 移動 
物体 の X 軸 に 対す る 回 転 


3D 変換 後 の ス クリ ー ン ( ХЕ) 
3D 変換 後 の ス クリ ー ン ( Y 座 標 ) 


| жеде UU s эчле РИ 
画面 LOAD x U 
| の 半径 , 高 さ 入力 š 1 ーー — | 


画面 LOAD 


|| 回転 体 
| WIREFRAME 描く 
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回 転 体 マ ッ ピ ング ・ プ ログ ラム リス ト 


1 * ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ 
2 "* Ж 
507% MAFFING - ROTATION gak x 
4 7% Ж 
Š 7x Frogrammed By С SAIMU 1 * 
6 "X x 
77% 1985 . 4 . 1 Ж 
в “ж x 
© "XKKKKKKXKXKKKKXKKKXKKXKXXKXKXKXEXKXKXKKKXKXK 
ТӨӨ. *"eee—— ЛУ; EFA ーーーーーーーーーーーーーーーーーーーーーーー 


118 ELIST Ө:ОРТІОМ SCREEN iMIDTH 88,25,0,.0:CLS 
128 DIM FAL (7) 

138 ХО=220: Ү0=100:5ТЕ=10:5ТЕ1=50 

14 FOR І=0 TO 7:РА (І) =1: МЕХТ 

200 ”一 一 一 一 一 一 一 一 一 一 AAI ルー チッ ーー ーーーーーーーーーーーーーーーーーーーーーーーー 
210 SCREEN 2,2,0: 60506 40068 

2280 SCREEN 6,0,0: GOSUBRB 1000: GOSUE 20090 

230 IF FC-80 THEN 250 

248 COLOR FC:GOSUER 1500 

258 COLOR 7 :GODSUB 28808 

268 FRW O:CLS:PRINT "LMAFFING FILE 1" 

270 FRINT " 1. SCREEN SAVE" 

288 FRINT " 2. SCREEN LOAD" 

298 FRINT " 5. END" 

S800 FRINT " Push Key 1 DR 2 OR š "i: 

Z180 АФ=ІМКЕҮФ (1) 

3280 ОМ ІМТК("125",А%) GOSUE 360, 3706, 240 

558 БОТО 3108 

5408 INIT:END 


3680 GOSUE 009: БОТО 268 

378 GOSUR 5009: 50ТО 268 

1888 “ーー ニー デーーーー ニ ーー カイ テー ダイ 2 Шаба? 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 
189818 CLS:DIM RL (188) ,RX (188) , RY (1809) 

1828 N=1: RL (日 ) = 日 

1838 FRINT "No. "3N; 

1848 INFUT " 29 =" H$ 

18580 IF H$-"E" THEN 1158 

1968 IF VAL (H$) +100 OR VAL(H$)z—-99 THEN 1020 

1078 INPUT " лут" К 

18880 IF RE= THEN 1878 

1898 RX(N-1)zR:RY(N-1)zVAL (H$) 

11080 IF N-1 THEN 11:68 

1118 L-SGR(CORX (N71) -RX (N72) 0 "2+ CRY (N71) -RY (N=2) 2 ^2) 
1120 RL (N—-1)=RL (N—2) +L 

11380 N=N+1: IF М>188 THEM 1138 

11480 GOTO 18:8 
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1190 N-zN-1:1F N-i THEN 1828 


11568 
1178 
15898 
1518 
1528 

1938 
1940 
1550 
1568 
1578 
1580 
15908 
1680980 
1618 
1628 
1638 
1640 
1650 
16680 
1678 
1589 
1698 
1788 
1718 
2006 
28018 
280298 
28:0 
28048 
28050 
2068 
2870 
288 
209 
2188 
2118 
2128 
2138 
2148 
21598 
2168 
2178 
2188 
2198 
22808 
2218 


222ü] 


aL aL a 


2220 
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L=RL CN—1) 
RETURN 
ы сыы ыы ыы JH TOO F HS еее 
FRW “НЕЕ 
FOR 2-8 TO N-1 
FY=RY (CZ) :PXRX (2) 2: PZz8: 50506 7500 
LINE (XF, YF)= (XF, YF) 。PBEYT 。 PC 
FOR TH= TO 568 STEP STF 


FX=RX (7) «COS CRAD (TH) ) 
FZ=RX (2) XSINI(RAD(CTH)) 


GOSUE 3580:LINE —(XF,YF) 
NEXT 
NEXT 
FOR TH-8 TO 568 STEF SIP 


FX=RX (ө) xEOS(FAD:(TH)):FY=RY (8) 
FZ=RX(8)XSIN(RAD(TH)): GDSUR 5506 
LINE (XP YP)-CXP, ҮРУ  FSET „ЕС 
FOR 7=@ TO N == $ 
FX=FRX(Z)j*XCOS¿(FADOCTH)):FY=RY (Z) 
FZ=RX(Z)XSIN(FRAD ТН) ) 
GOSUBR 5580:ГІМЕ ~ (ХР, ҮР) 
МЕХТ 
МЕХТ 
FRW Oz: RETURN 
”一 一 一 一 一 一 一 一 mpm 
DLS 
INFUT "SCREEN X START= 
INFUT"SCREENM X END 
INFLIT"SCREEN Y START= 
INFUT"SCREEN Y END “ХБ 
IF XS OR YSzB8 THEN 20080 
IF ХЕ?:659 OR ҮЕ>199 THEN 2880 
IF ХӨР>ХЕ OR YSEYE THEN 28808 
кезене eeu 
FRW EHFF:LXZXE-XS:LY-YE-YS 
SCGY=L /L. Y: Ez 1 
IF SCYZ1 THEN 
FOR J=LY TO B STEF 
LLzL-JXxGCY 
>з ІШІКІ CE) 
= (RY (K) -RY(GGZ-1) yk (LL НК (ドー1 ) ) 
хы zRY (u= k) -PY/OGRL CE2 RL (ビー1 ) ) 
R1=(RX( ド )ー ド RX( ド ー1) ) X CLL-RL (E—1)) 
RizRXUOE—-1)-R1/(ORL(CE) RL (ドー1 ) ) 
SÜ X=F6T(FR1) ZL. X 
IF SCX<1 THEM STFZ-1 ELSE STFZz 
FOR I-80 TD LX STEF ТЕХ 


上 ルー チエ 


ar xS 
"e XE 
"YS 


-STP2 


1/ 


SCREEN 8,2,0 


THEN Е=Е+1:ТЕ LL. SRL. tE: 


ӘТР2-і ELSE STF2=1/SCY 


) THEN 21468 


SCX 


全 一 一 


2240 


2?50 


aal 

2260 
2278 
2288 
2298 
2206 
2210 
i888 
5818 
38028 
38038 
38048 
2050 
3868 
38789 
38080 
38099 
3188 
3118 
35808 
2510 
3529 
Sag 
39489 
39938 
3568 
3578 
3588 
48088 
4018 
4028 
49038 
48048 
480589 
48068 
4078 
488 
4099 
41808 
4118 
4128 
4138 
50909 
3818 
5828 
38:38 
3948 


| コロ コロ 
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СС=РОІМТ (ІМТ (Х5+1+.5) , INT(YS+J+.5)) 

SCREEN 8,0,9 
PXs-RiXCOS(FAICI/LX) ) :FZ=R1*GTN(FRT(T/LX) ) 
GOSUE z588 

FSET (XF,YF,.CC):FSET (XF+1。YF'。CC) 


NEXT 
NEXT 
FRW iRETURN 
or AD ヨリ ケツ Бауда) ーーーーーーー デ ーー デー ニー や で の rh 
INPUT"X -- MOVE = ",MVX 
INPUT"Y == MOVE = ",MVY 
INPUT"X == ANGLE = ",RTX 
INFUT"Y == ANGLE = ",.RTY 
INFUT"Z ーー ANGLE = ",RTZ 


55=5ІМ(КАр (RTX) ) : C8ZCOS CRAD (КТУ) ) 
SF=STIN(RAD(RTY) ) : CF-COS CRAD (RTY) ) 
SF=SINIRAD (КТА) ) : CFzCOS (RAD (КТД) ) 


INFUT" Color = PE 

IF (РС<Ө)-(РС>7) THEN 2998 

RETURN 

”一 一 一 一 一 一 一 一 一 一 SD 2 サイ サー ーーーーーーーーーーーーーーーーーーーーーー 


ХЕчРХЖСЕЖСР-РҮЖ (GSXSFXCF-CSXSF) 
XF =XF+F2Z* (CSXSF*XCF+SSKSF) 
ҮЕчРХЖСЕЖЕР-РҮЖ (SS*SFXSF+CS*XCF) 
YFYPCPZXOUSXSFXSF-SSXCF) 
2Ес--РХЖСВЕЗРҮЖБӘЖСЕЗР ЖСӘЖСЕ 
XPZXOM-XPEZEMVX 
YPFzYO-YF-MVY 
RETURN 
ューーーーーーーーーー マウ リー カメ フー プー ロー ト " 一 一 一 一 一 一 一 一 一 一 一 一 一 一 
CLS:FRINT"E SCREEN LOAD 1" 
INFUT" FILE NAME 7? "TS 
IF LEN(T$)716 THEM 48808 
OFTION SCREEN 4: FRI НЕЕ 
ОРЕМ"І",1, ТФ: КЕС=0 
GOSUE &2080:1F WIZ2880 THEN 48089 
АФ=ІМРОТФ (128,1) :ES-INPUT$((128,1) 
ГЕУОФ"МЕМі: ", КЕС, АФ, E$: REC=REC+1 
IF RECZ£E£HCG THEN 4878 
CLOSE Жі:РКЫ BG: IMIT: QFTIOM SCREEN Ө 
FOR I=ü TO 7 

FALET I,FAL (I) 
МЕХТ:КЕТИЕМ 
е 9 meane о, 4 [DpbBU  ————————— meee mane mee meee mmea maet mt saae mate me meee samea me 
CLS:FRINT"E LOAD 1" 
INPUT" FILE NAME で ('/^-zRETURhND "TE 
IF LEN(T ま ) 515 THEN S888 
IF Тӛ"/" THEN RETURN 
50508 3899 
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5066 
сауа 
58088 
5890 
5106 
S118 
3128 
5150 
5140 
5150 
51680 
151615 
6018 
6020 
6038 
68040 
68059 
668 
60709 
68088 
680989 
61808 
óii8 
6128 
6150 
61489 
6180 
6499 
6 日 
6510 
528 
698 
6540 
&558 
6568 
6578 
65898 


2078 


2230 


2288 


о X1 シ リー ズ 用 変更 リス ト 


FOR I-8 TO 7 

FALET I,FAL(I) 
NEXT: RETURN 
OFTION SCREEN 4:FRW &HFF 
OFEN"I",1,T$: REC-8 
GÜSUE &500:1F WIz288 THEN RETURN 5008 
A*=INFUT$(128,1):EB$=INPUT$ (128, 1) 
DEVO$"MEM:",REC,A$,EH$:REC-REC^1 
IF REC«£HCB8 THEN 5120 
CLOSE #1:PRW G: INIT 
OFTION SCREEN 8:CLS:RETURN 
қайынды бака Wh Л к 
FRW B:CLS 
FRINT"L SAVE 1" 
INFUT" FILE NAME ^? (*/"-RETURN) 
IF LEN(T$) >16 THEN 6088 
IF T$-"/" THEN RETURN 
OFTION SCREEN 4:FRM НЕЕ 
OFEN"O",1, T$: REC=8 
PRINT 41,80 
FOR I-8 TO 7 

PRINT #1,РА (1) 
МЕХТ 
рЕУІФ"МЕМ: ", REC, A$, ВФ: РКІМТЊ1, А; B$; 
REC=REC+1 
IF RECZ£HCB THEN 6120 


жу 


"VT 


INFUT &1,WI 
IF WIZ288 THEN 6550 
FOR І-8 TO 7 
INFUT #1,.FAL (1) 
NEXT: RETURN 
GOSUB 5150 
PRINT"WIDTH IS NOT BB !! 
КҮФ=ІМКЕҮФ (1) 
RETURN 


WIDTH #177 


IF ХЕ>519 QR ҮЕ>199 THEN 206800 


SCREEN 8,1,8 
FSET (XP,YP,CC) 


(Fush Any key?) 


150 


X メ 1] シリ ー ズ を 使う 場合 は 次 の 各行 を 変更 し ます 。 


мөм 


図形 処理 技術 の 応用 


eie 


レイ トレ ー シ ン グ | 


私 た ちの まわ り に は , 限り な い 光 が 存在 し て いま す 。 光 の 本 質 は どう な の か と いう こと は , 従来 よ 
り 光 学 の 分 野 で 研究 され て き て いま す 。 そ れ に つい て 解説 する こと は , この 本 の 目的 で は な いと 思わ 
れ ま す の で 省き ます が , と り も な お さ ず 光 に よっ て , 私 た ち は 目 の 前 に ある 物体 の 存在 を 知る こと が 
で きる わけ で す 。 

ュ ン ピュ ー タ に 物体 を 形成 させ る うえ で も , より リア ル な (真実 味 の あ る ) モデ ル を 作成 する た め 
に は , 光 の 様子 どど の よう に し て 計算 させ れ ば よい か が 大 き な 課 題し と なり ます 。 光 源 か ら の 光 が 物 体 
に 当たっ た 場合 に た, どの よう に 見 える の か , どの よう に 映る の か が , 数 学 的 に 計算 され る 必要 が ある 
わけ で す が , これ は 従来 より , 幾何 光学 の 範囲 で 解明 され て いる の で , それ を 参考 に し て プロ グラ ム 
化し て いき ます 。 

幾何 光学 で は , XC 1 本 の 直進 する 線 と し て と ら え て いま す が , その 光線 の 当たり 具合 に よっ て 物 
体 の 棒 組 が どう 変化 する か を シミ ュ レ ー ト し て みる と いう 考え 方 を と り ま す 。 1 本 の 光線 は , 直進 性 
が あり , 物体 に 当たっ た 場合 に は その 材質 に 応じ し て 反射 し た り , 透過 し た り , 屈折 し た り し ます 。 こ 
れ ら の 現象 に は , すでに 数 学 的 に モデ ル 化 さ れ た も の が 存在 し て お り , そう いっ た 手法 で 物体 表面 上 
の 輝度 を 計算 する と と に よっ て , コン ピュ ー タ 内 部 に デー タ を 構築 する わけ で す 。 
光源 か ら の 光 が 突 き 進 ん で いく うち に , 物体 に 当たる か 当たら な いか を 計算 し , 当たれ ば それ が 鏡 
の よう な も の で 全 反 射す る の か , 吸収 され て し まう の か , 透き通る の か …… と いっ た 光 の 軌跡 を 追っ 
C, それ に よっ て どの よ ょ うに 形態 が 作ら れ て いる の か シミ ュ レ ー ト する 方 法 を , 光線 追跡 法 と いい ま 
す 。 つ まり レイ トレ ー シ ン グ と 呼ん を で いま す 。 レ イト レー シン グ の アル ゴリ ズム に は , さま ざま な 方 
法 が あり ます 。 

と と では, まず 3 次 元 グ ラフ ィ ッ クス の 応用 と し て , 基礎 的 な 事 が ら を 学ん で いた だ こう と いら 5 意 
図 で , 不透明 な 球体 に 光 が 当 た っ た 場合 に どの よう に 変化 する か と いう とこ と に つい て 解説 し その ア 
ル ゴ リ ズム を 紹介 し ます 。 光 線 の 当たる 角度 に 応じ て 物体 が どう 変化 する か , 光線 の 輝度 の 強 さ に よ 
っ て どの よう に 変わ っ て いく の か シミ ュ レ ー ト し て みみ ましょ 5% 

な お , 本 書 で は , 3 次 元 グ ラフ ィ ッ クス の 入門 書 と し て の 位置 づけ を し て いる た め , レイ トレ ー シ 
ング の その 他 の テク ニッ ク , 例え ば 物体 の 材質 が 半 透 明 だ っ た り , 透明 だ っ た り し た ら ど うな る か , 
影 の 床 面 へ の 映り 込み (シェ イデ ィング ) は どう する の か , テク スチ ャ マッ ピン グ と 組み 合わ せ た 場 
合 は どう する の か , その 他 の 自由 な 曲面 に 対し て は どう する の か 等 に つい て は , 他 書 に 譲り ます 。 


ーー レイ トレ ー ジ ング に よる 画像 の 作り 方 | БЕНЕН 


レイ トレ ー シ ン グ は , アメ リカ の ん 研究 所 の ター ナー・ ホ イッ ティ ッ ド に よっ て 開発 され た も の 
T, 表示 され る 物体 全面 の 光 の 当たり 具合 の 情報 を , 各 画 素 に お ける 明度 と し て 計算 する も の で す 。 
1 つの スク リー ン 上 の 画素 の 明る さ を 計算 す る た め に , 視点 か ら 光 源 ま で を 逆 に た どっ て いき , 視点 
か ら の その 画素 を 通る 視線 が 出合 5 物体 の 面 の 情報 と , そこ か ら 反 射 し て 至る 次 の 面 , そし て その 次 
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の 面 と 最終 的 に 至 達 する 光源 の 情報 と いっ た も の に よっ て 決定 され ます 。 

これ は , 人 間 の 側 か ら の 視覚 と し て は , 自然 に 理解 し や すい 考え 方 で あり , 理論 と し て も 非常 に 単 
純 で す が , すべ て の 画素 に つい て 視線 の 計算 を 行う た め に , 計算 時 間 が 非常 に 長く か か る と いう 欠点 
も あり ます 。 し か し , あら ゆる 物体 に つい て の リア ル な シミ ュ レ ーション が 可能 な た め , 非常 に 大 事 
な 手法 と いう こと が で きま す 。 

本 格 的 な 方 法 と し て は , 図 5 一 1 の よう に 考え る と , 第 1 章 39-40 ペ ー ジ に 示し た , 次 の 2 つの 式 
が 導 か れ ま す 。 


Т=һ+> Ы+ 
Lil= (kd соз i+ ks(cos7 )") * 1, 


これ は , 先ほど の ター ナー・ ホ イッ ティ ッ ド に よっ て 実証 され て いま す 。 彼 が 実際 に , 透明 な ガラ 
ス 球 と 光沢 の ある 球体 を 市 松 模様 の 上 に 浮か び 上 が ら せ , それ に 上 方 か ら の 光 に よる ハイ ライ ト や , 
床 面 へ の 影 , 透明 球 か ら 透 か し て 見 える 床 面 の ゆがみ , 光沢 の ある 球体 に 映る 床 面 の 模様 と いっ た シ 
ミュ レー ショ ン を み ど と に 表現 し て 上 の 数 式 を 実証 し て いま す 。 こ れ に は , 数 々 の テク ニッ ク が いる 
わけ で す が , 本 書 で は その 初歩 の テク ニッ ク と し て , 光源 か ら の 光 が 球 体 に どう 反映 され る か に つい 
て の み 解 説 し ます の で , 方 程 式 と し て は 簡単 な 構造 と な り ま す 。 
通常 , 光 に は 電球 な どの 点 光源 か ら 出 る 光 と , 営 光 灯 等 の 線 光 源 か らく る 光 , それ に , 太陽 光 の よ 
うに 平行 光線 か らく る 光 と が 存在 し ます 。 こ こ で は , 解説 を わか りや すく する た め に , 平行 光線 に つ 
いて の み 考 えま す 。 平行 光線 は , 場所 に よら ず 一 定 の 方 向 を 向い て いる 光線 で ある と いえ ます 。 平行 
光線 は , 場所 に 関係 な く 一 定 の 方 向 を 向い た 光線 で あり , その 名 成分 を ベク トル L, 球体 の 法 線 を べ 
クト ル N と する と , 表面 の 輝度 7 は , 次 の 関係 式 で 表 さ れ ま す ( 図 5 一 2)。 
7=7oc( ア ・W ) 

これ は , ラン バー の 法則 (Lambers Law) と 呼ば れ て いる も の で す 。 こ こ で 比例 定数 は , 照明 の 
1 一 一 


ノー マル ライ ン 


視線 の 
方 向 


T : 透過 光線 


図 5 一 | レイ トレ ー シ ン グ の 考え 方 


153 


oc COSÓ 


"i 


図 5 一 2 ラン バー の 法則 
強 さ , 乱反射 に より 規定 し ます 。 こ と ここ で は , こと の 式 に よっ て , 球面 上 の 輝度 を 計算 し て いき ます 。 

ここ で 各 球 面 の 色 が 問題 に な っ て きま す 。 幸 か 不幸 か , X 1 ター ボ お よび X 1 シリ ー ズ の マイ コン 
に は 8 色 の 色 数 し か 存在 し て いま せん (ほとん どの マイ ュ ン が そう で す が )。 こ れ は , 図 5 一 3 の よう 
に R ( 赤 ), С d, B (а) 各色 に 対し て 1 ビッ ト (0 か 1 か の 2 値 ) し か 持ち 合わ せ て お ら ず , 
これ ら の 組み 合わ せ に よっ て 8 色 の 表示 を し て いる わけ で す 。 こ うい っ た パソ ュ コン で 多く の 色 を 表現 
する た め に は , ディ ザ 法 (dithering) と いう テク ニッ ク を 行い ます 。 

これ は , 一 種 の モザ イク の よう な も の で , 8 色 の 色 を うま く 並 べ る こと に よっ て 必要 な 色 を 表現 し 
よう と いう も の で す 。 基 本 的 に は , 規則 正しい 方 法 (組織 的 ディ ザ 法 ) と , 乱数 を 使用 し た 不 規則 な 
HE (ラン ダム ・ デ ィ ザ 法 ) に 分 か れ ま す 。 

組織 的 ディ ザ 法 は ,。 タイ ル ペ イン ト と し て , すでに 別 著 「 パ ソ ュ ング ラフ ィ ッ クス の 作り 方 楽し み 
方 」( 学 研 版 ) で も 紹介 済み で す 。 こ れ を 使用 する と, 規則 性 が ある た め , 普通 の 2 次 元 の ペイ ント 
の 場合 に は 効果 を 発揮 する の で す が , 本 書 で 扱う よう な 3 次 元 プ リ ミ テ ィ ブ を 沙 る 場合 に は 。 か えっ 
て その 周期 的 な パタ ー ン が , Г] と な っ て 不 自然 な も の に な っ て し まい ます 。 そ の た め , ここ で 
の 中 間 色 表示 に は , ラン ダム ・ デ ィ ザ 法 を 使用 し ます 。 

ラン ダム ・ デ ィ ザ 法 で は , プリ ミ テ ィ ブ に あたる 各 ビ ピク セル の 輝度 に , スレ ッ シ ョ ルド 値 を 乱数 に 
よっ て 変化 させ て 確率 的 に 対応 きせ ます 。 例 えば , X 1 の 場合 は , 640X200 ド ッ ト で 画面 が 構成 さ 
れ て いま す 。 こ れ は 縦横 比 の 分 割 で いく と 2 倍 の 関係 に な っ て いる の で , 横 方 向 の 2 ドッ ト を 1 画素 


5—3 X 1 ター ボン X | シリー ズ の カラ ー 表 示 
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と し て 考え る と , 1 画素 に 対し 3 段階 の 表現 が 可能 に な り ま す 。 
この 各 画 素 に ラン ダム ・ デ ィ ザ 法 を 適用 し ます 。 各 画素 の 輝度 は , スレ ッ シ ョ ルド 値 を 変化 させ る 
た め に , 組み 込み 関数 に よっ て , 


Тл ТЕГЕ > 
TO 


の 範囲 で 一 様 な 乱数 を 作り 出し ます 。 
通常 , 連続 的 に グレ イス ケー ル を 得る の 必要 な スレ ッ シ ョ ルド は , 
THi-B-lN TH2=B++N 
(た だ し , B は グレ イス ケー ル の 中 心 の 輝度 (この 場合 は 128) N は コン トラ スト ) 
で 表わさ れ ま す 。 


これ を 使う こと で 中 間 色 表示 が 滑ら か な 表示 と な り ま す 。 


——————MÁ “буа グラ ム を 入力 し て 実行 (RUN) させ 
| 2u22208't5: ИРИ 


バッ ク 7 イロ ハ (0 一 7) = 


と 聞い て くる の で , まず 画面 の 背景 色 を 入力 し て くだ さい 。 
次 いで , 


| Жа? / ハン ケイ = | 


と 聞い て きま す の で , 実際 に 描か せる 球 の 半径 を 入力 し て くだ さい 。 さら に , 


X—DIRECTION MOVE 
Y—DIRECTION MOVE = 


と 続け て 聞い て くる の で , 描き た い 球 の スク リー ン 上 の 位置 を 入力 し て くだ さい 。 図 5 一 4 の よう に 
スク リー ン 上 の 原点 (0 , 0 ) の 位置 は , 画面 中 央 に 設置 , X 正 方 向 で 中 央 より 右 方 に , Y 正 方 向 で 
中 央 より 上 方 に 球 の 中 心 を 移動 させ ます 。 例 えば , Х-50, Y= ニ ー20 を 入力 する と , スク リー ン 上 


( —320,200 ) 


(319, 200) (-320, ioo) F 320 ( 319, 100) 


(—320, —199) (319, —199) (—320, —99) " (319, —99) 
(X1 タ ー ボ の 原点 位置 ) ашны! 


図 5 一 4 レイ トレ ー シ ン グ ・ プ ログ ラム の スク リー ン 座 標 系 の X, Y 座標 
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で は 中 央 より 右 横 方 向 に 50, 下方 向 に 20 移 動 し た 所 を 中 心 と し た 球 を 描く こと と な り ま す 。 
次 に , 


LIGHT ANGLE(Y 一 AXIS) = 


と 聞い て くる の で , 光線 が 球体 に 当たる 角度 を 指定 し て くだ さい 。 ス クリ ー ン 座標 系 で 見 た 場合 に , 
Y 軸 の 光線 角度 が 与え を られ ます 。 例 えば , 0 度 を 入力 する た め に , [01CRI] と キー 入力 する と , 光源 
は 上 方 か ら 下 方 に 向け て 光 が 当 た り , ハイ ライ ト 点 は , 図 5 一 5 の 左 の 図 の よ うに 真 上 に 位置 する こ 
と に な り ま す 。 

次 いで , 


LIGHT ANGLE(X—Z PLANE) = 


と 聞い て くる の で , スク リー ン 座 標 系 で の 双 軸 の 角度 を 入力 し て くだ さい 。 例え ば, 先ほど の 
LIGHT ANGLE (Y—AXIS) を 90 度 と し た 場合 は 。 図 bB-6 の よう に 角度 指定 に よっ て ハイ ライ ト 
点 が 変化 し ます 。 

以上 の よう に , ハイ ライ ト 点 の 指示 は , LIGHT ANGLE の 2 つの 値 の 指示 に よっ て 決め る こと 
が で きま す 。 

次 に , 描く 球体 の 色 を 指定 する わけ で す が , BLUE (青色 ) RED (жа), GREEN (緑色 ) そ 
れ ぞ れ を , 256 階 調 で 分 割 し , 合計 1,677 万 7,216 通 り の 組み 合わ せ に よっ て 色 表 現 を 行い ます 。 た だ 
メメ 1 ターボ お よび XX 1 は, 8 色 の 色 デ ー タ し か 持っ て いま せん の で , ドッ ト ご と の 混色 に よっ て カラ 
ー の 組み 合わ せ を 行い ます 。 組 み 合 わせ に よる 色 の 濃度 は 各色 0255 階 調 の 混合 比 で 入力 し ます 。 
現実 の 色 で は 何 色 ま で 認識 で きる か 試し て くだ さい 。 


キュ ウタ イ ノ イロ BLUE (0-255) 
キュ ウタ イ / イロ RED(0—255) 
キュ ウタ イ 2 イロ GREEN(0 一 255) 


各 基 本 色 の 色 デ ー タ を 混ぜ あわ せる こと に っ て , 色 指 定 が で きた と 思い ます が , KOT, ハイ ライ 
ト 点 の 輝度 を 指定 する こと が で きま す 。 


ハイ ライ ト 点 T ハイ ライ ト 点 


LIGHT ANGLE LIGHT ANGLE LIGHT ANGLE LIGHT ANGLE 
(YーAXIS) =0 (Y — AXIS) = 30 (Y — AXIS) — 90 (Y — AXIS) 2180 


図 5 一 5 LIGHT ANGLE(Y-AXIS) に よる 変換 
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Y Y Y Y 
ハイ ライ ト 点 ハイ ライ ト 点 ハイ ライ ト 点 ハイ ライ ト 点 
X X X X 


(X—Z PLANE)=0 (X—Z PLANE)=30 (XーZ PLANE)=90 (X—Z PLANE)=270 


5 一 6 LIGHT ANGLE(X-Z PLANE) に よる 変換 (Y-AXIS が 90 度 の 場合 の 例 ) 


ハイ ライ ト キョ ウド (1 一 255) = 


と 聞い て くる の で , 光 を 当て な い 場 合 は [0ICR], 順次 光 を 強く し て いき , 最高 に 強く 当て る 場合 は , 
2 15l5ICR] と 入力 し て くだ さい 。256 通 り の 階 調 で 明度 が 与え られ ます 。 


レイ トレ ー シ ン グ 出力 例 
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X1 タ ー ボ と X1 の 係数 
スク リー ン 中 央 の 位置 ( X 座 標 ) 
スク リー ン 中 央 の 位置 ( Y 座 標 ) 
画像 の ノイ ズ の 振幅 


光線 の Z 方 向 ベ クト ル 
光線 の 余弦 


球 の 各 点 の 色 


画像 グレ ー ス ケー ル の スレ ッ シ ョ ルド 値 


Y 軸 に 垂直 な 面 の 円 の 半径 


X 方向 の 移動 量 


X0 
YO 
N1 
С 
R1 
R2 
Y 方 向 の 移動 量 


光線 の Y 軸 に 対す る 角度 


BL 
RD 
Ly 
LZ 
CS 
CL 
SX 


Еа 


x Y 軸 に 垂直 な 円 の 半径 計算 | 6% | 


> FOR Y— —R1 ТО В1 


. FOR X ニ ーR2 TO R2 Í 


—< Z 座 標 を 求め る 


光線 の 余弦 月 を 求め る | 


。 COS 0<0 
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l *ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ* 
e “Ж * 
ES RAY TRACEING for м.1.8 Ж 
4 “Ж file name is [ RAY TRACE 1 Ж 
5 UM Ж 
& "x 19959. 4. 15 * 
7 ^X Frogramed by [ SAIMU 1 Ж 
в “ж * 
9 ыма ылда ді. 
100 “一 一 一 一 一 一 一 一 一 一 ミッ ョ キ セ ッ テイ ーーーーーーーーーーーーーーーーーーーーーーーーー 


118 OFTIONSCREEN O:kLIST 8 27 (ХІ turbo) 
128 WIDTH 88,25,1,:ІМІТ 27 (ХІ turbo) 
13 WIDTH 89: INIT "XI ) 
1480 WDz2:XQ-:20:YO0-208 "ХХІ turbo) 
198 *WDz1:XO0-220:YO-z1808 2 
168 Ms 128: №44: М№М1=192 
208 一 一 一 一 一 一 一 一 一 一 ガンマ ウー. プー PAP 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 
218 DEF ЕМХ(А, В) =5ІМ (Кар (аА) ) XSINCRAD(CE)) 

220 DEF ЕМУ(А) -СО5 (КАП (А9) 

d DEF Ем? (А, B)y=SIN(RAD(6))XCOS(RAD(EB) ) 

ӨН パーーーーーーーーーー №902 2 カラ ー ーーーーーーーーーーーーーーーーーーーーーー 
3160 INPUT “Wy? 2 イロ n (8-7) = "„С 

A20 IF C486 ОК C27 THEN 310 

3320 LINE £(80,8)-(6:9,WDX*208-1),FSET,C, BF 


ӨНЕ “ーーーーーー ニ ーーーー レイ トレ ー シ ジン の "ニュウ リョ ワウ --------------- 
418 CLS:INFUT "キュ ウー リン ケイ 
428 IF К1<Я=6 THEN 418 ELSE R1zK1/WD 

458 INFUT "X-DIRECTION MOVE = ",MVX 
448 INFUT "Y-DIRECTION MOVE = ",MVY 
458 INFUT "LIGHT ANGLE (Y-AXIS) = "X.ALFPHA 
468 INFUT "LIGHT ANGLE (X-Z РАМЕ) = ", BETA 
478 INFUT "#2997 / АП BLUE (8-295) = ",BL 

4880 IF RBLS OR BL>255 THEN 478 

4980 INFUT キュウ タウ イー Яп RED (09-255) = "RD 

3808 IF RDz8 OR RD2>2SS THEN 490 

3180 INFUT "キュ ウタ イー / хп GREEN(G-2558) = ",GR 

Send IP жақан OR бК>255 THEN 518 

S38 INPUT リリ イラ イト Ta?h" (1-255) = "HL 


548 IF HLE1 ОК HL>255 THEN 530 

358 LX-FNX(GALFHA,EETA) 

2680 LY=FNY(ALFHA) 

3780 LZ=FNZ (АРНА, BETA) 

OBG "ーーーーーーーーーー トイ ーー トレ ルーシ 7 トー ます ゴマ ブレ イー ннн 
6180 FRW &HFF 

6280 FOR Y--R1 TO Кі 

45] R2-SQR(R17^2-Y^2) 

646 FOR X--R2 TO R2 


————— — нн 
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658 
668 
678 
688 
69 
788 
718 
728 
738 
748 
758 
888 
818 
828 
8:8 
846 
esa 
858 
870 
888 
ова 
918 


Z=80R (R2^2—-X^2) 
CS- XKXLX-YXLY-ZXKLZ) /R1 
IF CS THEN CS-8 
L-N :GOSUB 888:GO0SUB 988:FSET (SX,SY,.CL) 
L-N1:GOSUB 888:GO0SUB 988:FSET (SX+1,SY, CL) 
IF MD=1 THEN 7238 
L-N1:GOSUB 800: 60508 988:FSET (SX.SY*1,CL) 
L-N : GOSUE 809: 60508 980:FSET (SX+1,SY+1, CL) 
NEXT 
NEXT 


В-СӨЖБІ + CRND (1) -. 5) XM--HLXCS^4 
RzCSXRD-* (RND (1) ~. 8) XM--HHLXCS^A 
G-CSXGR-* (RND (1) ~. 5) XM--HLXCS^4 
CL = 日 

IF ЕМ THEN CLzCL-1 

IF КУ THEN С=С +2 

IF GeL THEN CL=CL+4 

RETURN 


ーーーーーーーー…ー マウ リー АТЫ 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 


SXzXO-*-2X X-MVX: SYzYO-WDX Y—-MVY: RETURN 
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| ステ レオ ・ グ ラフ ィ ッ クス | 
和 2 UU _ E 


物体 を 立体 的 に 表現 し よう と いう 技術 は , 過去 に お いて 数 々 の 研究 が され て き て いま す 。 原理 的 に 
i, ある 物体 を 右目 と 左目 で 眺め た 場合 , その 物体 が 見 える 形態 は , 両目 の 幅 ガ だ けず れ て お り , 2 
次 元 の 図形 で も 同様 の ずれ を それ ぞ れ の 目 に 再現 し た 場合 に は , 立体 的 に 見 る と と が で きる と いう こ 
と に な り ま す 。 

こと で は , この 原理 を 利用 し て , 奥行 の ある 図形 つま り リ アル な 図形 を 創出 する アプ リ ケ ー シ ョ 
ン を 紹介 し ます 。 立体 視 は , 左右 の 目 の 距 離 Z 分 だ けず れ た 別々 の 透視 図 を 作る 必要 が あり ます 。 


一 EEC — — 


通常 , 平均 的 な 視力 を 持っ て いる 人 の 場合 は , 目 の 前 方 約 25~50cm の 所 に 最も 強力 に ステ レオ 効 
果 が 生じ し る と いわ れ て いま す 。 例えば, 両目 の 間隔 を 5cm と し た 場合 に は , ステ レオ 角 は , KORT 
表す こと が で きま す 。 

0—tan !(5 /50)—5.710* 

図 5 一 7 の よう に , 両目 の 間隔 を 7, 投影 面 まで の 距離 を を と する と , も し 立体 視 を 見 る 人 の 焦点 

距離 が を 単位 と し た ら , は 次 の 式 で 求め られ ます 。 
tan (d/k)-5.7Y 
し た が っ て , 正しい ステ レオ 角 の を 保つ た め に は , 次 の よう に な り ま す 。 
d—k/10 

これ に より 左目 の 透視 図 は , 水平 に の プ 1= ニ ん 20 だ け 平 行 移 動 , 右側 は 一 d プ 1=ーk ノ 20 だ け 平 
行 移動 し て 透視 投影 し た も の で ある と いえ ます 。 こ の 場合 の 変換 マト リッ クス は , 右目 の 透視 図 の 座 
ЖИН?» (Xr Yu), 左目 の それ を (Х\, Y) と する と , 次 の よう に 表現 で きま す 。 


Z P (x y, z) 


Aw =>» 


図 5 一 7 
ステ レオ ・ グ ラフ ィ ッ クス の 基礎 
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100 0 1 0 0 
0 0 0 
ІХ» Үк ll=k z Il 00 0-- ІХ. Y: =i z J| ооо 
を b 
m @ 1 -- 65 1 
———MG——— oo この プロ グラ ム を キー 入力 し て 実行 (RUN) 
プロ グラ ム の 操作 方 法 
| ブロ グラ ム の 操作 方 法 | させ る と , 第 3 章 で 作成 し た 形状 モデ リン グ の 3 


次 元 デ ー タ を , ステ レオ めがね で 立体 的 に 見 る と と が で きま す 。 

まず , ファ イル 名 を 聞い て くる の で , 第 3 章 で 作成 し た 図形 の ファ イル 名 を 入力 し て くだ さい 。 

デー タ が 読み 込ま れる と , 赤 と 青 で ディ スプ レイ 上 に 立体 画像 が 描か れ ま す 。 た だ , 第 3 章 で 作成 
し た デー タ が 透視 法 的 に 画面 と 一 致し な い 場 合 が あり ます の で , QAX, QAY, QAZ の 値 を 操作 し て , 
最高 の 位置 を 見 い だ し て くだ さい 。 

ステ レオ めがね は , 右目 に 青 , 左目 に 赤 の フィ ルター が あたる よう に か け て 物体 を 眺め て くだ さい 。 
作成 し た デー タ の 奥行 が は っ きり と 現れ て きま す 。 


左目 右目 


5—8 ステ レオ 位置 関係 


NE 


3D-TOOL (第 3 章 ) 
rd at Un di 


つく る アプ リケーション 


3D—STEREO 


a Lo Pre) 
アブ リー ツ ロジ 


45-9 3 D ツ ー ル と 3 D ス テレ オ の ソフ トウ ェ ア 構 成 図 
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ステ レオ めがね の 作り 方 

と こと で 紹介 し て いる 「 ス テレ オグ ラフ ィ ッ クス ・ プ ログ ラム 」 お よび 次 項 の 「 ス テレ オフ ラク タ 
ル ・ プ ログ ラム 」 の 実行 画面 は ステ レオ めがね を 通し て 眺め る こと に よっ て , あざ や か な 立体 像 を 
見 る こと と が で きま す 。 ス テレ オ め が ね の 作り 方 は , 以下 の と お り で す 。 
圏 ス テレ オメ ガ ネ の 作り 方 
[材料 ] 厚手 の 画用紙 また は ボー ル 紙 (フレ ー ム 用 )/ 赤 と 再 の モロ ハン 紙 (5X6cm・ 各 1 枚 ) 
下 の 設計 図 を 画用紙 また は ボー ル 紙 に 写し , リン カク 線 に 沿っ て 長方形 に 切り 出す 。 
ヤマ オリ 線 で 折り 合わ せ , 左右 の 目 の 部 分 を 切り 抜く 。 

フレ ー ム の 裏面 に の り ま た は ペー パー ボン ド を 塗る 。 
赤 と 青 の モロ ハン 紙 を 片方 の フレ ー ム 貼る 。 
ヤマ オリ 線 を 中 心 に 貼り 合わ せる 。 
下 の リ ンカ タク 線 ( 鼻 が あたる 部 分 ) を 切り 取っ て で き 上 が り 。 


666060090 


画 ス テレ オ め が ね 設計 図 


163 


ライ ン で 描く 点 の 数 
目 の 間隔 の 2 分 の 1 点 の 画面 上 X 方 向 の 位置 
dm, 緑 で 描く スク リー ン 上 の 移動 量 点 の 画面 上 Y 方 向 の 位置 
e 24208 デー タ の x 座標 
QAX スク リー ン の 移動 ( X 方 向 ) デー タ の Y 座標 
QAY スク リー ン の 移動 ( Y 方 向 ) デー タ の Z 座 標 
QAZ スク リー ン の 移動 ( Z 方 向 ) TX の 正弦 成分 
TX の 余弦 成分 


TY の 正弦 成分 


FOR N=1 TO 
表示 デー タ 数 


RETURN 
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ステ レオ ン ラ フィ ックス ・ プ ログ ラム リス ト 


“Ж 


1 
2 7% 


x 
“Ж 
^x 


А NEXT: RETURM 


299999999929 99992999929999 9922 2999292922: 

Ж 

SD-STEREO (WIRE FRAME? У. 1.0 Ж 

x 

Frogrammed Бу [ SAIMU 1 * 

x 

1985 . 4. 1 Ж 

Ж 

ト る る を る る る も る る も る る る る る る る る る る る る する る る る る る する る る る る る る 1 
mmo ニッ ーーー ニュ ーー SOS Те аы 2-с —— saa 
INIT:WIDTH 80,25,0,0:kLIST Ө 27 (X1 turbo) 
" INIT:WIDTH 88 gU. OST ) 

DEFINT A-N 

АЕТ=2080: AHF-zZ0: EHF-S58: BED-zS: GED-z30: АТК=10: AR=30 


DIM MD(BED, ABD) , HF (BHF, AHF) ,FT(2,AFPT) 
DIM TR(ATR, 12), RH (AR). RR (AR) 
EYD=6: OFS-2:C-22 
AAX=-50: ОАҮ=509: QAZ=-50: STF-20: STF1=10 
TX=--30: TY=-30: FGZ ェ テー ミロ 日: GOSUB 608 
”一 一 一 一 一 一 一 一 一 一 メイ ーー ПЕЕ 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 一 
GOSUR 68808 
FOR N=1 TO ATR 
IF TR(N,G? =9 THEN 288 
Ez-1:COLOR 2 
ом TR(N。B) GOSUE 22090, 2400, 376006, 2800, 4000 
E--E:COLOR 1 
DN ТК(М,8) GOSUE 23288,2400, 7600, 2888, 4000 


---------- "ОК Уолт --------------------- 
SS=SIN(RAD(TX)):SF=SIN(RAD(TY)) 
TS=COS(RAD(TX)):TF=COS(RAD(TY)) 
RETURN 

ーーー ンー りー 2ред FaR も ーー ニーー ニ ーーー デニ ーー 
N8=TR(N., 1): N1=MD (NƏ, 68) 

FOR 11=1 TO Ni 

NN1zMD(NO,I12:GOSUB 52508 


I2-HF(1,NN1):GOSUB S88:LINE (X,Y)-(X,Y),FSET 


FOR Je2 TO HFP(B。NN1) 

IZ-HF(J,NN1):608UB S5088:LINE -(X, Y) 
NEXT 
[2:HF (1, NN1): GOSUE SOBO:LINE -(X, Y) : RETURN 
:---------- ワイ ヤー フレ ー ム "433*b4 2 ----------- 
R=TR (М, 1) 


FOR 410 TO 188 STEF STF 
XB-RxXxCOS (RAD GILO) : Кі =КжбІМ (КАР (Ј1)) 
X-X8: Y-R1:Z2-8 
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3458 БОБОВ S828:LINE (X,Y)-(X,Y),PSET 

3468 FOR 22-8 ТО 268 STEF STF1 

3478 X2 X8: Y-R1XCOS (RAD (J2)) : ZeR1KSIN(RAD (C222) 
3488 GOSUB S820:LINE -(X,Y) 

3498 NEXT 

3508 NEXT 

3518 FOR J1= TO 180 STEP STF 

3528 . YO-RKCOS(RAD(J1)) : R12RXSIN(RADCI1)) 

3538 Х=К1:Ү=ҮЙ:2=0 

3548 . GOSUB S828:LINE(X,Y) - (X, Y) ,FSET 

3558 FOR J2=0 TO 368 STEF STF1 

3568 X=R1*CDS (RAD (J2) ):Ү=ҮВ: ZcRIXSIN(RAD (Ј2)) 
3578 GOSUB S8280:LINE -(X,Y) 

3588 NEXT 

3598 NEXT:RETURN 

SeBg ーーーーーーーーーー ワイ ヤー フレ ー ム 95402914 5 ----------- 
3618 R=TR(N。 1) : RHETR(N, 2) 

X628 FOR ZJi-8 TO RH STEF RH/2 

S638 — XsRiYzZJ1:2-8 

3648 БОБОВ S820:LINE(X, Y) -(X, Y) , PSET 

3450 FOR 12-8 TO 560 STEF STP1 


3668 X-RXCQS(ORAD(G(I22)2): Y2ZJ1: Z=RKSIN(RAD (0.7292 
3678 GOSUB S828:LINE -(X, Y) 

3680 NEXT 

A690 NEXT 


5788 FOR J=@ TO 3680 STEF STF 

3718 X«sRXCOS (RAD (J) ):Y=RH: 2=КЖжБІМ (КАР (Ј) ) 
3728 GOSUR 35020:X1-X:Y1zY 

5758 X-RXCOS (RAD(J)) : YO: ZcRXSIN(GRAD(GCI)) 
3748 GOSUE 5020:X2-X: Y2-Y 

3798 LINE CXl,YI)—C0CX2,Y2),PFSET 

A760 NEXT:RETURN 

SO "eee ドー マレ ルーム УЛАР b Фф ーーーーーーー デ ーーー 
5818 R1=TR(N, 1) :R2=TR (N, 2) : RH=TR (N, Ж) 

3828 FOR ZJ1=0 TO RH STEF RH/2 

3838 RzERZt*(GR1-R2)*((ORH-ZJi1?/RH 

3848 X-R:Y22J1:Z-20 

3898 GOSUB SO2O:LINE(OGX, YO —- CX, Y) , FSET 
i868 FOR J2-80 TO 368 STEF STF1 


3878 X«RXCOS (RAD(GI2) ) z YzZJ1: ZeRXSIN(GRAD (I2) ) 
38808 GOSUE SO0280:LINE —(X, Y) 

5898 МЕХТ 

5988 МЕХТ 


5918 FOR 0-8 TO 5608 STEF ӨТЕ 

3928 X=R1xXCOS(RAD(J)):Y=8:Z=R1xXSIN(RAD(J) ) 
3938 GOSUE 50280:X1-zX:Y1-Y 

5940 XzRZXCOS (RAD (J?) ) : Y-RH: ZcR2XSIN(CGRAD (402) 
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GOSUE S020:X2=X: Y2=Y 
LINE (X1,Y1)0-(X2, Y2) , PSET 


---------- ロイ ヤー フレ ー ム "4327544 5 ----------- 


FOR J1=1 TO TR(N。1) :R=RR (71) 
YO-RH(Ji1):YsYO: XsR: Z=B 
GOSUE 5S820:LINE(X,Y)-((X, Y) ,FSET 
FOR J2=0 TO 268 STEF STF1 
XsRXCOS (RAD (J2) ) z Y YO: ZeRXSIN (RAD (J2)) 
GOSUE 5828:LINE -(X,Y) 
NEXT 
NEXT 
FOR 21-8 TO Z68 STEF STF 
Х=КК (1) ЖСОЅ (RAD (J1 ) ) : Y-RH (1) 
Z=RR (1) *SIN(RAD (J1 ) ) 
GOSUB 5028:LINE(X,Y)-(X, Y) ,FSET 
FOR J2=2 TO TR(N,1) 
X=RR (J2) XCOS (RAD (J1 ) ) : Y-RH (J2) 
Z=RR (J2) *GTN(RAD(J1 ) ) 
BUSUB S028:LINE -(X,Y) 
NEXT 
NEXT: RETURN 


?一 一 一 一 一 一 一 一 一 一 カイ テー フラ イー / ^L наннан 


X=FT (0, I2): Y-PT(C1, I2):Z=PT(2, I2) 
GOSUBR 5500 
Х=Х-ОАХ: Y=Yー ロ AY: Z=Zー ロ AZ 
ХХ=ХЖТЕ+АЖБЕ 
YYzXXSSXSF-YXTSG-ZXSSXTF 
ZZz-XXTSXSF-YXSS-ZXTSXTF 
X=XX:Y=YY:Z=ZZ 

X-X-EYDXE 
FS-1-Z/FSZ:X-«X/FS: YY/FS 

X320 (X+0OFSXE) x2: Yz1800—Y 
RETURN 

E-S8:608UB S638: GO0SUB 5220: Б050Е 35638 
GOSUE 5540: 60506 $5638 
X=X+TX:Y=Y+TY:Z=Z+TZ:RETURN 
ХасХЖТКҮЖТЕ? -ҒҮЖ (CGRXXSRYXTRZ-TRXXSRZ) 
XBzZX CTRXXSRYXTRZ-SRXXSRZ) 

ХХ-ХА-ХВ 

YAOz—-XXTRYXSRZ-YX CGRXXSRYXSRZ-TRXXTRZ) 
ҮВ-2Ж (TRXXSRYXSRZ*-SRXXTRZ) 

YY=YA+YE 
ZZXXSGRY-YXSRXXTRY-ZEKTRXXTRY 

X=XX: Y=YY: Z-ZZ: RETURN 

X=XXTX: YYXTY: ZoZKTZ: RETURN 


一 一 一 一 一 一 一 一 一 一 カイ テン ワイ ーー バン カン ーーーーーーーーーーーーーーーーーーー 
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MESSEN 


TX=TR(N。E) : TY-TRON, E12 : TZ=TR (N, E+2) 
IF К<>8 THEM 8698 
SRX-SIN(GRAD(GCT X22 : SRY-SIN(CRAD CTY)) 
SRZzSIN(GRAD(CTZ?) 

TRXzCOS (RAD (ТХ) ) : TRY-COS (КАР (ТҮ) ) 
TRZ=CHS(RAD(TZ) ) 

EmESS:RETURN 


| ge—— mr ロー ト ~ Oe 
CLS:LOCATE 1,80:PRINT" L LOAD ]":LOCATE 2,2 
INFUT"LLOAD FILE NAME (Е? = EXIT 21 = ",T$ 


IF T$-"E" THEN RETURN 
OFEN "I",1,T$ 
FOR I-8 TO ATR 
FOR J=B TO 13 
INPUT #1,TR(I,J) 
NEXT 
NEXT 
FOR I=0 TO BBD 
INFUT #1,MD(I,0) 
FOR 02-1 TO MD(I,G8) 
INFUT %1.Мр(1,4) 
NEXT 
NEXT 
FOR I-8 TO AHF 
INPUT $1,HF(8,I) 
FOR J=1 TO HF(8,1) 
INPUT #1,HF(J, I) 
NEXT 
NEXT 
FOR I-8 TO AFT 
FOR J=0 TO 2 
INFUT #1,FT(J, I) 
NEXT 
NEXT 
FOR I=0 TO AR 
INFUT &1,RRCGD,RH(CI) 
NEXT 
CLOSE #1:RETUFN 
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| ステ レオ フラ クタ ル | 


日 本 地図 を 広げ , 東北 地方 の 三陸 海岸 ん 見 て くだ さい 。 海岸 線 は 複雑 に 港 や 入り 江 で 引っ 込み 。 ІҢ 
が 出る と いう , いわ ゆる リア ス 式 海岸 独特 の 形状 が 見 られ ます 。 もう少し 詳し い 東 北 地方 だ け の 地図 
を 見 て も 同じ で す 。 さ ら に 詳し い 地 図 を 見 て も , 小さ な 湾 や 岬 が 複雑 な 形状 を な し て いま す 。 こ の よ 
う に 全体 を 見 て も , その 一 部 を 見 て も , 同じ よう な 人 性 質 を 持っ た 曲線 が あり ます 。 これ を , 自己 相同 
性 を 持つ 図形 と いい ます 。 

3 次 元 空間 で いう と, 尾根 と 谷 を 思い 浮か べ て くだ さい 。 大き な 尾 根 と 大 き な 谷 が ある と する と , 
その 谷 の 川 に 注ぐ 小さ な 支流 が 作っ た 谷 が 無数 に あり , 小さ な 尾根 が あり ます 。 そ の 支流 を 見 て も , 
さら に 小さ な 川 が 注ぐ 谷 が ある と いっ た 具合 で す 。 木 の 幹 と 枝 , 細い 枝 に 同様 な 形状 が 見 られ ます 。 
山 の で こ ぼ こ も ゃ 同様 で す 。 

この 自己 相同 性 と いう 性 質 を 取り 込ん で 作っ た 図形 を , フラ クタ ル 図 形 と 総称 し て いま す 。 

フラ クタ ル 理 論 の 詳細 な 解説 は , 他 書 に 譲る と し て , 本 書 で は 具体 的 に フラ クタ ル 画 像 を 発生 させ 
る アル ゴリ ズム に つい て , し か も ステ レオ 画像 作成 の アル ゴリ ズム に つい て 解説 し ます 。 

単純 な 平面 で の 自己 相同 形 ( 例 : ヒル ベル ト 曲 線 , シェ ルビ ンス キー 曲線 ) の 発生 アル ゴリ ズム は , 
別 著 「 プ ログ ラミ ング ・ テ クニ ッ ク 集 」 (学研 版 ) の 中 で も 発表 し て いま す の で , ここ で は 3 次 元 図形 
(こよ る フラ クタ ル 画 像 の 発生 アル ゴリ ズム に つい て 紹介 し ます 。 ス テレ オ 法 に つい て は 前 項 の 解説 を 
参考 に し て くだ さい 。 


| フラ クタ ル 画 像 の 作り 方 | 


フラ クタ ル 画 像 発生 の アル ゴリ ズム は , 基本 的 な 考え 方 の 積み 重ね の 上 に 成り 立っ て いま す 。 3 次 


画 
元 フ ラク タル 画像 に 入る 前 に , 2 次 元 図形 に 関す る 代表 的 な 考え 方 か ら 解説 し まし ょ う 。 


コッ ホホ 曲線 に よる 


単純 な フラ クタ ル 図 形 と し て は , コッホ 曲線 が 
i б あり ます 。 こ の 発生 アル ゴリ ズム は 他 書 で も お な 
フラ クタ ル 図 形 の 発生 じみ な の で , 詳細 は 省略 し ます が , 簡単 に 考え 方 
の み を 解説 し ます 。 

1 本 の 線 分 を AB, その 中 点 を M と する と , M と AB に 対し て 垂 線 方 向 に 移動 させ た 場合 に , 
АМ=ММ= МО=ОВ な る 点 N,M,O を 求め , それ ら を 結ぶ 直線 に 変形 させ ます 。 次 いで 線 分 AN, 
NM, MO, OB を それ ぞ れ 線 分 AB と 同じ よう に し て 4 つの 中 点 を 発生 させ ます 。 

この よう に し て , 順次 , 細分 化し て いき ます 。 す る と , 図 5 一 11 の よう に , コッ ホホ 曲線 を 作成 する 
と と が で きま す 。 


ーー 次 に 少し 複雑 こ な り ます が , 3 次 元 立体 で ある 
中 間 変 位 に よる || ща, 中 間 変 位 に よる フラ クタ ル で 発生 させ る ア 
フラ クタ ル 画 像 の 発生 ル ゴ リ ズム に つい て 紹介 し ます 。 


三 角形 ABC の 線 分 AB, BC, CA に 対し , 中 央 Mi M。, M。 の それ ぞ れ の 点 か ら 垂 直 に 距離 7 (た 
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45—10 コッ ホオ 曲線 の 発生 45—11 コッ ホホ 曲線 
だ し 7 は 変数 ) だ け 派 生 さ せ た 点 L, M, N を 求め , 新しい 線 分 AL, LB, BM, MC, CN, NA, LM, 
MN, NL を 派生 させ ます 。 こ の よう に し て 順次 細分 化し て いき ます 。 

プロ グラ ム は , リス ト を 打ち 込ん だ 後に RUN させ る と , LEVEL (分 割 数 ) ご と に キー 入力 待ち 
に な る の で , スペ ー ス キー を 押せ ば , 6 レベ ル ま で フラ クタ ル 直 線 を 派生 させ る こと が で きま す C 
れ 以 上 は 画面 を つ ' な し て し まう の で 無視 し ます )。 こ れ を 先述 の ステ レオ ・ グ ラフ ィ ッ クス の アル ゴリ 
ズム と マー ジ す る と , 3 次 元 の 山 が 浮か び 上 が っ て きま す 。 


15—12 フラ クタ ル 図 形 の 生成 
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フラ クタ ル 図 形 の 原型 (ステ レオ 化し て いな いも の ) 


/ 


MENS 
DIMENSION- 8 ind 


DIMENSION= 3 
DIMENSION- 2 


頂点 A の X 座 標 辺 CA の 中 点 の X 座標 
頂点 A の Y 座 標 辺 CA の 中 点 の Y 座 標 
| AZ 頂点 4 の Z 座 標 辺 CA の 中 点 の Z 座標 
BX 頂点 B の X ER 左目 (一 1 ) と 右目 ( 1 ) の 判定 子 
BY TABOY 座標 | 目 の 間 隔 の 2 分 の 1 
BZ 頂点 B の Z 座 標 Жж, 縁 で 描く スク リー ン 上 の 移動 量 
CX 頂点 C の X 座 標 スク リー ン の 移動 ( X 方 向 ) 
CY BUT. スク リー ン の 移動 ( Y 方 向 ) 
CZ 頂点 C の 2 座標 スク リー ン の 移動 ( Z 方 向 ) 
H 深 さ の 係数 | TX | スク リー ン の 回 転 ( X 軸 まわ り ) 
LX | の の xm TY スク リー ン の 回 転 ( Y 軸 まわ り ) 
LY VABO RAO Y 座標 | PSZ | 目 の 位置 (スク リー ン 中 央 か ら の 距離 ) 
LZ 辺 AB の 中 点 の Z 座 標 SS TX の 正弦 成分 
MX 辺 BC の 中 点 の X 座標 TS TX の 余弦 成分 
MY 辺 BC の 中 点 の Y 座標 SF TY の 正弦 成分 
м2 辺 BC の 中 点 の 7 座標 TF |TY0#3%82> 
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ステ レオ フラ クタ ル ・ プ ログ ラム の 流れ 


| 配列 の 設定 1 2. 
—  — CALLED 


Ио == Б 


С mum  ) "БЕТЕН ED 
[ *somw [ш 


|| STACK PUSH : 


x 頂点 を 入れ 換え 
| フラ クタ ル 再 帰 ル ー チ ン |К 


EEC | 

ШЕТІЗГІ ЕЕЕ 

Ега. 
por PUSH 


頂点 を 入れ 換え 
| — STACK PULL 


RETURN 
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ステ レオ イフ ラン タル ・ フロ グラ ムリ スト 


1 *ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ 
2 °x * 
= Ж STEREO FRACTAL V.1.8 x 
4 “Ж file name is [FRACTAL. GEN] x 
a еж Ж 
б “Ж Frogramed by Г SAIMU 1 x 
7 7% 19895 w 2.11 Ж 
в “ж x 
© *"ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ 


Ig ?!eee——— 57 ヨ キ セテ ゴイ ーーーーーーーーーーーーーーーーーーーーーーーーー 
118 DIM D(82?),AX(8),0Y (B) 。RZ(B) , BXCED , BY (8) 。 BZ (8) 
120 DIM СХ (8) CYCS) CZ CB L ХБ) 。LY(8) 1748) 

158 DIM МХ(8),МҮ(В), MZ (8), МХ (8), NY (89) „М2 (8) 

148 INIT:OFTION SCREEN G:kLIST 日 “(А turto ) 
150 CLS 4:WIDTH 48,25,.1,2 "(ХІ turbo ) 
160 "INIT:QFTION SCREEN siELIST Ө *^ (X1 turbo M18) 
1780 “CLS 4:WIDTH 408,25,08,1 ?* (X1 turbo M19) 
188 "INIT:WIDTH 48 "X ) 
1980 EYDzó:ü0FS-2 

200 (3àX--580:00Y-50: 03Z2--59 

2180 TX--—3BD0:TY-—28:F82-—300:G0S8UE 5100 

220 FOR NN-1 TO 6 

XE CLS4:LOCATE 8,22:РКІМТ "DIMENSION-z"sNN-1 

240 AXX20:0Y-40:AàZ-zO0:BX-100:BY-160:RZ-808 

2580 CXz9540: CY-z160: CZ-A40 

268 FzBO:NzNN-1:D-1 


27 GOSUE 80 

280 . X$-INKEYS$(B):IF X$-"" THEN 240 

298 NEXT:END 

3588 "ーーーーーーーーーー 7595. Unt-u7" ルー キー フー --------------- 


518 NzN-1:IF М>=6 THEN 350 

3280 IF DZz8 THEN D--D:GOTO 5408 

X0 GOSUR 800: М=м+1: RETURN 

тїр N=N+1: RETURN 

358 GOSUBR 688:6GO0SUE 19808 

2158 BXzsLX:BY-LY: BZzLZ:CX-cNX: CYzNY: CZzNZ 
378 GOSUE 308 

вө GOSUE 2089 

598 GOSLE 1989 

488 ñX=LX:ñY=LY:ñZ=L Z: CX-MX: CYzMY: CZzMZ 
418 GOSUR 308 

4280 GOSUR 2888 

аза GOSUE 180909 

448 AXSNX: AY=NY:AZ=NZ: BX-MX:BY-MY:BZZMZ 
450 50508 700 
468 GOSUE 280860 

478 GDSUR 18088 
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174 


AXsMX: AY=MY: AZ=MZ: BXzNX:BY-NY:EBEZ-NZ 
CX-LX: CYzLY: CZ-LZ:D--D 

GOSUE 3808 

GOSUR 2888 


М=М+ 1 

RETURN 

*ー ニ ーーーーーーーーー キュ ウデ ーー / ТАЗЫ) ーー ーーーーーーーーーーーーーーーーーーーー 
GX-(BY-CYOX(GXZ-BZ)—-(CAY-BYOX(CBZ-—-CZ) 


бҮ-(ЕХ-СХ)Ж(А2-В2)-(АХ-БХ)Ж(Е2-(2) 
GZ-GOBX-CXO x CAY-BYO-CAX-BXD Ж (BY-CY) 
GR-SQR(GXXGX-GYXGY-GZXGZ) 
KX-CAX-BX)/2:EY-CAY-BYO)/2:EZ-OAZ-BZ)/2 
GOSUR 728:LX-X9:LY-Y9:LZ2229 

ЕХ= OBX-CX)/2:EYz GIY-CYO) /2: EZ (ВАСА) /2 
GOSUE 720: MXzX9: МҮжҮ9:М2-29 

ЕХ=((СХ+АХ) /2:kYz-(GCY-AY) 2: EZzX(Z-3Z) /2 
GOSUE 720: NX-X9: NYzYO9: NZ-Z9 

RETURN 

HT=INT(SKRND(1))+1 

X9zEX-HTXGX/GR: Y9zEY-HTXGY/GR: ZOzEZ-HTXGZ/GR 
RETLIRN 


ғ езен ынна ындыны қан озу) Ды F 下 和 
E--1:FC-2:GÜSUBRB 820:FC-1:E--E 

ХчАХ:ҮлоЖАУ:; Z=AZ z IXI turbo ) 
1 X=AX: YAY: Z= Z :" (X1 turbo МІЗ £& X1) 
GOSUE 38008 

X1=F' X: Y1=F'Y 

ХаВХ:ҮоЖБВҮ:2-Е2 “(ХІ turbo) 


“ХаВХ:ҮсБҮ:2-В2 
GOSUE 3008 
X2-PX:IYZ-PY 
ХаСХ: ҮсоЖжСҮ: 2-С2 (ХІ turbo ) 
?TXCX:YzCY:Z-CZ 7" (X1 turbo M18 £& X1) 
GOSUE 50090 

AS-PX:YG-FY 
LINE (X1,Y12—0X2,Y2) POSET&,PC 
LINE (X2,Y2)-—((0X3, Y2) „РБЕТ, РС 
LINE 1X3,Y3)950XT,Y12,FPB5DET.FEG 
RETURN 

> 一 一 一 一 一 一 一 一 一 一 ハン マウ 4t 2) ————— i i‘ 
F=F+1: АХ (Р) =AX:AY(F)=AY:AZ(F)=AZ 

BEX CF) zEX: BY CF) «БҮ: BZCF) EZ 

CX CF) CX: CY CF) CY: CZ (OP) CZ 
LX(F)=L X:sL Y (F)=L Y:sL 2 (F)=L Z 

MX CF) zMX: MY CF) MY : MZ CP) =MZ 

NX CF) NX: NY CF) NY : NZ CP) =NZ 

D (F) D: RETURN 


“(ХІ turbo M18 & X1) 
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20808 
2818 
2020 
2020 
2040 
20580 
2868 
2078 
38808 
3818 
3828 
3838 
2046 
2950 
5868 
3878 
38088 
5898 
31808 
3118 
i128 
3138 


hm なー ニー トー AIRA О SUUM emm 


АХ=АХ (Р) : АҮ=АҮ (Р) : AZ=AZ (Е) 
EX=BX (F) : BY=BY (F) s BZzBZ CF) 
CX=CX CF) :CYzCY (F): С2=С2 (Р) 
LX=L X (F) :LY=L Y (F) :LZ=L Z (Р) 
MXzMX CF) : MYzMY CF) : MZEMZ (Р) 
NXzNX CF) s NYzNY CF) :z NZ=NZ (Р) 
D-D(F):FzF-—1: RETURN 


---------- TRANS ルー チッ -------- 


Х-Х-САХ: У=Ү-0АҮ: 2=2-0А2 
ХХ=ХЖТЕ+2ЖЅЕ 
YYzXXSSKSF-YXTS-ZXSSXTF 
ZZ--XXTSXSF-YXSSc-ZKTSXTF 
X=XX:Y=YY:Z=ZZ 

Х=Х-ЕҮРЖЕ 

FS-1-Z2/FSZ: X=X/FS: Y-Y/FS 
FX=X+0FSXE:FY=Y 


SS=SIN(RAD(TX)):SF=SIN(RAD(TY)) 
TS=COS(RAD(TX)):TF=COS(RAD(TY)) 
RETLIRN 


---------- カワ ウト" 2 ケイ サン ------- 
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И 
E/LODAD プ ログ ラム 


作成 し た グラ フィ ックス を , フロ ッ ピ ー に SAVE プ LOAD する た め の サ ブル ー チ ン を 紹介 し ます 。 
本 書 の すべ て の プロ グラ ム で 作成 し た グラ フィ ックス に つい て 使用 可能 で す 。 基 本 的 に は , どの プロ 
グラ ム に も , SAVE/LOAD ルー チン が 付い て いま す の で , 作成 し た 画面 を 読み 出す 場合 に お 使い 
くだ さい 。 

プロ グラ ム を 実行 (RUN) する と , 画面 上 に 次 の よう に 表示 され ます 。 


画面 の SAV 


1. LOAD 
2. SAVE 
3. END 


画面 の SAVE プ LOAD プ ログ ラム 


1 * ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ 
2X * 
жш “k SAVE £& LOAD Ж 
д "ж Ж 
е *Ж Frogrammed Бу [ SAIMU 1 Ж 
а `x x 
7 "X 1985 。 4. 1 Ld 
в “ж x 
9 *ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ 
1068 7?-—————————— -“ k Deb“ —— F 


118 INIT:CLS:kKLIST 8 

115 FOR I8 TO 7:FAL(ID)-I:NEXT 

128 FRINT " 1. LOAD ":FRINT " 2. SAVE ":FRINT " 3. END " 
PRINT " Push Key 1 OR 2 OR 3 т" 
E$=INKEY$(1):IF кФ-"" THEN 148 
IF K$-"1" THEN GOSUE 288: GOTO 118 
IF K$z"2" THEN GOSUE 4080:60Т70 110 
IF КФч"5Е" THEN GOTO 198 
GOTO 148 
CLS: INIT: END 
P ae oe i es oe i mat a ME rc NP RUN 
CLS:FRINT"E LOAD 1" 
INFUT" FILE NAME で ('/'zRETURND) ",Т% 
IF LEN(T$)716 THEN 200 
IF T$-"/" THEN RETURN 

339 GOSUR 290 
FOR I8 TO 7 
FALET I,FAL (I) 

NEXT: RETURN 
OFTIONSCREEN 4: FRW £HFF 
OFEN"I",1,T$:REC-G 


作成 し た 画面 を 呼び 出し た いと き は 1, 
SAVE し た いと き は 2, プロ グラ ム を 終了 し た 
い 場 合 は 3 を 選ん で くだ さい 。SAVE プ LOAD 
の ファ イル 名 は , ファ イル ディ スク リプ タ を 指定 
し た 後 , 13 文 字 以 内 で 指定 し て くだ さい 。 

当 プ ログ ラム で は , 5 イン チ の ディ スク に , 6 
枚 の 画像 シフ ァ ァ イ ル す る こと が 可能 で す 。 な お , 
同一 名 で ファ イル する と , 前 に 作成 し た 絵 の 上 に 
画面 が SAVE され ます の で 注意 し て くだ さい 
(作成 し た 画面 の 安全 を 守る た め に , ロッ ク を か 
ける こと を お すす めし ます )。 

ロッ ク は , 次 の よう に し て か け ま す 。 

SET "яу", "р" 


SAVE/LOAD 
ТЕСТА 


画面 ファ イル 


(アス キー ファ イル ) 


518 GOSUR &18:IF WIJ >80 THEM RETURN 200 
32280 A*é=INFUT$ (128, 1): E$-INFUT£$(0128,1) 
ささ DEVO$"MEM: ", КЕС, АФ, B$:REC=REC+1 

3480 IF RECZ£&HCO THEN 328 

3980 CLOSE #1:FRW G: INIT 

260 OFTIONSCREEN Ө: СЦ: RETURN 

дай gE oe —— 
410 FRW O:CLS 

420 FRINT"E SAVE 1" 

аза INFUT" FILE NAME 2 (*/*zRETURND ",Т% 
448 IF (ЕМ(Т%) >16 THEN GOTO 400 

4580 IF T£$z"/" THEN RETURN 

468 OFTIONSCREEN 4:FRUW £HFF 

4780 OFEN"O",.1,T$:REC-O 

488 PRINT #1,80 

498 FOR I=6 TO 7 

5988 PRINT #1,FAL (I) 

518 NEXT 

S28 DEVI$"MEM:", КЕС, АФ, ЕФ: FRINT#1, A$: ЕФ; 
S380 REC=REC+1 

540 IF RECZ£HCO THEN 528 

S598 БОТО 750 

БВВ Uem WIDTH FEIW? ---------------------- 
618 INFUT %1,М1 

620 IF MTE SBB THEN 6608 

&ig8 FOR I8 TO 7 

640 INFUT #1,.РА (I) 

650 МЕХТ: RETURN 

08 GOSUR 550 

6780 PRINT"WIDTH IS NOT 88 !' (Fush Апу key) "3 
69880 КҮФ=ІМКЕҮФ (1) 

698 RETURN 
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БЕДОР 


本 書 で 解説 し て いる 演算 式 は , 高等 学校 の 数 学 II B で 学ぶ 行列 の 演算 (マト リッ クス 演算 ) を 使用 
мық ちあ 


27 マト リッ クス 演算 の 用 語 


e e R өй ARE LU AES ъй», Ерім 
に より 成り 立っ て お り , 行 と 列 が あり ます 。 行 は 横 方 向 を さ し , PRHA 2 U Cu 32; ПФ 
数 と 列 の 数 が 等 し い 場 合 。 その マト リッ クス は 正方 で ある と いわ れ ま す 。 こ こと で CG の 変換 式 で 利用 
し た 4 X 4 正方 マト リッ クス を 例 に と っ て 考え る と , 次 の よう に 書き 表す こと が で きま す 。 


ここ で 最初 の 添字 は 。 マト リッ クス の 行 , 2 つ 目 の 添字 は マト リッ クス の 列 を 示し て いま す 。 例 え 
ば аз は , ЖАП, 第 3 列 の 要素 で ある と いえ ます 。 一 般 的 に %% 行 2 裂 の マト リッ クス は , 次 数 mx 
2 の マト リッ クス と いえ ます 。 

上 記 4 X 4 マト リッ クス で は , % 三 2 で あり , ау, do, Qs, 44 の よう な 要素 を 対 角 要 素 と 呼ん で い 
ます 。 これら の 対 角 要 素 の 和 は トレ ー ス と 呼ば れ ま す 。 

単位 マト リッ クス と は , この 対 角 要 素 が すべ て 1 G, その 他 の 要素 が 0 の マト リッ クス を いい ます 。 
先ほど の 例 で いう と , 


с — © © 


0 
0 
0 
1 


©» C» жы © 


1 
0 
0 
0 


と な れ ば 4 X 4 の 単位 マト リッ クス と いえ ます 。 
マト リッ クス 演算 に お いて は , 1 つの マト リッ クス の 名 要素 が , 他 の マト リッ クス の 対応 する 要素 
と 等 し い 場合 に お いて の み 。 その 2 つの マト リッ クス は 互い に 等 し いと いえ ます 。 


_2. マ トリ ックス の 和 と 差 ー 


2 つの マト リッ クス が 同一 次 数 の と き に , マト リッ クス の 和 と 差 が 定義 で きま す 。 例 を あげ て 解説 
し ます 。 
マト リッ クス の 和 は , それ ぞ れ の 対応 する 各 要 素 の 和 を 求め れ ば よく , 次 の よう に 計算 で きま す 。 
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Qu (12 (біз а14 бі біл біз bu 
Qa の 22 の 23 の 24 + Өзі бәз бәз bz 
の 31 (аз?  Q33 Аза Өзі bs b33 b34 
Qa (042 (баз (44 ба баз біз ба 


an 十 1 aitb бз баз Qutb 
ат + фәр Caz? 十 bz Qs+bs 24 бә 
азі бз anb bs as Das daa b34 
аа + ра аба as Баз Qaa bas 


同様 に マト リッ クス の 差 は , 次 の よう に 計算 で きま す 。 


Qu (і? (біз (614 бі бо bs bu 
の 21 (22 (23  Q24 Өзі D22 боз bz 
Яз 32 (зз (за Өзі bs bs bsa 
Qa 042 (аз 444 ба біз bas ba 


Qu bi の 2 一 の 2 (із- біз Qi 14 
Азі- Өзі | の zz 一 2 23— боз | d24— Dz4 
Q31— Өзі の ss 一 sz | Азз- b33 аза — за 


а Вар の 42 一 042 (аз- bas 44 — аа 


3 . マ トリ ックス 演算 の 積 


マト リッ クス 演算 の 積 は 。 CGC に と っ て 最も 大 切な 計算 式 で す 。 次 数 が тхт と тхт, の 2 つ 
の マト リッ クス の 積 を 定義 むる た め に は , 最初 の マト リッ クス の 列 数 , つま り m と , 2 つ 目 の マト 
リッ クス の 行 数 , つま り の 数 が 一 致し て いな けれ ば な り ま せん 。 これが 演算 で 行う うえ で の 条件 
で す 。 例 に 従っ て 計算 し て み ま し ょ 5 


Qu (2 (із 


bu biz bis 
の 21 の 22 23 

bà боз зз 
Qa の 32 (зз 

bai b32 b33 


Qubiu 2205 十 is03」 の ii の 2 + A12022 二 413b32 Qubis + 412023 + 413b33 
421b11 + 22021 + бэзбзі Q21b12+ 22022 a23b32 ami bia + Q22D23- @2з8зз 
3 の i 十 dazb2i + Аззбзі (з1бі2:- 432b22+ ss の s2 аз. bis + 432b23 + G3sb3s 
Aabi 十 の 4205: 十 4503」 аал + Ga2bo22 + алзбз? Qaibis + ааг оз + の 4 033 


この 例 で も 明らか な よう に , 一 般 的 に MXM の マト リッ クス と хт Оч К) ур хо УӘ 
る と , 色 X メ 25 の マト リッ クス と な る こと が わか り ます 。 
こと で マト リッ クス の 乗算 で は , 次 の 関係 式 が 成り 立ち ます 。 
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@ 可 換 で は な い 。 
[A][B] * [B][A] 
ө 1 次 分 配 則 が 成り 立つ 
А(В-С)-АВ-АС 
@ 第 2 分 配 則 が 成り 立つ 
(А+В)С=АС+ВС 
@ 結 合 則 が 成り 立つ 
А(ВС)-(АВОС 


4. 正 方 マト リッ クス の 行列 計算 方 法 2. 
正方 マト リッ クス の 行列 式 は , | A | で 表現 され ます 。 3 X 3 の マト リッ クス を も っ て これ を 解く 


の 行列 は , 
Qa の i2 の 13 
の 22 の 23 а  Q23 の 21  Q22 
Qa Q22 (23 = 411 —: 12 +a 
Аза @зз аз の 33 Qa の 32 
Qai の 32 (зз 
と 表現 で きま す 。 こ れ を 解く と , 次 の よう に な り ま す 。 
ai бї (із 
dun (ә? (әз = ay É22t35— (23032) — dis (21033 — 123031) + Qs (2132 — 422431) 


Qai зз の 33 


5. 正方 マト リッ クス の 逆 マ トリ ックス 

正方 マ < トリ ックス に お いて 逆 マ トリ ックス を 求め る に は , 次 の 関係 式 が 成り 立ち ます 。 
[A]IX]=[Y] な ら ば [X]-[AT"[Y] 

ここ で ПАТ, 正方 マト リッ クス (AJ の 逆 マ トリ ックス で す (ここ と で マト リッ クス の 行列 が 0 

で な いな ら ば , た だ 1 つ だ け こ の 逆 マ トリ ックス が 存在 し ます )。 

次 に , 逆 マ トリ ックス の 重要 な 性 質 に つい て 述べ ます 。 

任意 の マト リッ クス [А] に 対し て , 
[A]AT'-[] "た だ し 還 は 単位 マト リッ クス 

の 等 式 が 成り 立ち ます 。 
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4—27 Канг ол-е 画像 入力 


第 2 章 で 紹介 し た 2 次 元 画像 処理 用 の デザ イン ツー ル を 使え ば , 読者 諸氏 が それ ぞ れ イメ ー ジ され 
る 独自 の 画像 を 入力 する こと が 可能 で す 。 と ころ で , いち いち 絵 を 描い て いく の は どう ゃ 面倒 だ , B 
動 的 に 取り 込め る ハー ド は な いも の か と いっ た 人 の た め に , 新しい 入力 装置 が 開発 され まし た 。 

カラ ー イ メー ジ ボ ー ド CZ-8BV1 が それ で す 。 こ の ボー ド を X1 タ ー ボ ン X1 シ リー ズ に 装着 する 
と , テレ ビ , EFF, ビデ オカ メラ , ビデ オデ ィ ス ク 等 の 映像 も, カラ ー 静 止 画像 と し て パソ ュ ン テ 
レビ 双 1 タ ー ボ ノ 又 1 シリ ー ズ に その まま 入力 する こと が で きま す 。 

取り 込ん だ 画像 は , 拡大 縮小 切り 抜き プ 輪 郭 抽出 等 , 自在 に 修正 加工 が で き , カセ ッ ト テ ー プ 
や フロ ッ ピ ー デ ィ ス ク 人 保存 し た り 再 生 し た りす る こと や , プリ ンタ で ハー ドコ ピー を と る こと も る 可 
能 で す 。 ま た , コマ 落と し や 4 画面 ノ 16 画 面 の マル チ ス トロ ボア クシ ョ ン 効 果 の 演出 が 可能 で す 。 


1、 カ ラー イメ ー ジ ボー ド の 本 体 へ の 装着 
カラ ー イ メー ジ ボ ー ド CZ-8BV1 を 購入 する と , 下図 の よう な ハー ド が 梱包 され て いま す 。 


き ③/ 〇 イン ター フェ イス @② 外 部 ユニ ッ ト  ②⑨ 映像 調整 つま み 

BISOUS 色あい 調整 つま み 

⑥ 色 の 濃 さ 調整 つま み 
⑦ 階 調 調整 つま み 


N [外部 コ ニ ッ ト 


I/O イ ンタ ー フ エイ ス ボ ー ド 


⑧ ビ デオ 入力 端子 
④| 〇 スロ ッ ト コ ネ ク タ ブリッ ジ 出 力 端子 

まず , 1 ププ 0 イン ター フェ イス ボー ド を コン ピュ ー タ の 拡張 プ O ス ロッ ト に 接続 , 次 に , 外部 = 
ニッ ト の ケー ブル コネ クタ を ID インター フェ イス ボー ド の コネ クタ に 接続 し ます (コネ クタ は 両 
端 の ネジ を ドラ イベ バー で し っ か り と め る )。 次 に コン ピュ ー タ 本 体 と 外部 ヘ ユニット の それ ぞ れ の フレ 
一 人 了 一 入 端子 (FG) を 付属 の ブラ イド ワイ ヤー で 接続 (雑音 を 多く 発生 する 機器 が 近く に ある 場 
EE, カラ ー イ メー ジ ボ ー ド か ら の 画像 を 安定 させ る た め に 有効 ) し ます 。 

最後 に , 外部 ニ ユニット の ビデ オス 入 力 端子 に 入力 し た い 機 器 の 出力 端子 (例え ば , テレ ビ 放 送 を 直接 
入力 し た いと き は テレ ビ か ら の モニ ター 出力 を , VTR か ら の 映像 を 直接 入力 し た い 場 合 は VTR の 
映像 出力 ) を 接続 し ます 。 外 部 ニ ユニット の ブリ ッ ジ 出力 端子 は , ビデ オォ 入力 端子 に 入れ た 映像 を 別 の 
ディ スプ レイ 等 に モニ ター する 場合 に 使用 し ます 。 


181 


イシ ター ジア エ マヌ 
ボー ド 


2 . 外部 ユニ ッ ト と の 接続 例 


(1) テレ ビ 放 送 と VTR か ら の 映像 を 得る 接続 法 
VTR に カメ ラ を 接続 する と , カメ ラ か ら の 情報 も 入力 する こと が で きま す 。 


テレ ビ 放 送 


NA ピ デ オ (信号 源 ) 
ANT L - Пг JE 


— ティ スプ レイ テレ ビ j 
(CZ-85OD) 


CZ-8BV1 


パー ツナ ルコ ゴン ピュ ー タ 
(CZ-8520) 
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(2) ビデ オカ メラ と ビデ オマ ル チ プ ロ セ ッ サ を 使っ て 映像 を 得る 接続 法 
ビデ オカ メラ か ら の 画像 情報 を 色 補正 する 場合 ビデ オマ ル チ プ ロ セ ッ サ (CZ-8VP1) を 併用 
する と , 種々 の 色 補 正 が で き て 便利 で す 。 


ディ スプ レイ テレ ビ 
(CZ-85OD) 


映像 出力 [ブリッジ 


(XC-8SA) “р 
(接写 機能 あり) E lU. 


= а 
Tran s ピ デ オ 一 4 パー ソナ ルコ ンピュータ 
An カフ ー イ メー ジ (07-8520) 


カメ ラス タン ド 
(IT-2OTS) 


これ ら の 接続 例 を も と に ,「 カ ラー イメ ー ジ ッ ツー ル 」 の ソフ トウ ェ ア を 使っ て , 各種 入力 装置 か ら の 
イメ ー ジ 画面 を 取り 込ん で くだ さい 。 な お , 取り 込ん だ 画像 は , 付録 1 (176 ペ ー ジ ) の ЗАУЕ/ 
LOAD プロ グラ ム を 起動 させ て 画面 を SAVE し た 後 , 種 z の プロ グラ ム で 処理 する こと と が で きま す 。 
例え ば , 本 書 で 紹介 し た マッ ピン グ ・ プ ログ ラム を 使え ば , 種々 の 画像 変換 が 可能 に な り ま す 。 


カラ ー イ メー ジ ボ ー ド を 下記 の 機器 で 使用 する 場合 に は 。 オプ ショ ン と し て 表 中 の 〇 印 の ハー ド が 
必要 で す の で ご 注意 くだ さい 。 


CZ-8OOC 
CZ-801C 


CZ-802C 


CZ-850C 
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ーーーーーーーーーーーー ニ ーーーーーーーーーー ニ ーーーーーーーーー 


メ ュ ター ポ ・ < 次元 グラ フィ ックス の 描き 方 
掲載 ブ プログラム パッ 7 PA 2 
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う ご ざ いま し た 。 本 書 に より BASIC に よる 3: 元 図形 処理 の 手法 に つい て ご 理解 を 深め て いた 


oh し た ら 幸 いで ご ざい ます 。 


本 書 掲載 の プロ グラ ム 中 より , 下記 の プロ グラ ム を 収録 し た フロ ッ ピ ー デ ィ ス ク (84; 
ШЕН) を お わけ し て お り ま す 。 AE AA s くだ きい 。 


カラ ー 平 面 画 の 製作 ツー ル で す 。 

@ 3 次 元 デ ザイ ン ツ ー ル ブロ グラ ム т 
747—7 レー ム モ デル の 製作 ツー ル で す 。 

@ 各 種 マ ッ ピ ング プロ グラ ム 
球体 マッ ピン グ プ ロ グラ ム 
円 柱 マ ッ ピ ング プロ グラ ム 
円 氏 マ ッ ピ ング プロ グラ ム | 機能 を も っ 
直方 体 マッ ビン グ プ ロ グラ ム | て いま す 。 
回 転 体 マ ッ ピ ング プログラム 

⑯ レ イト レー シン グ ブ ログ ラム 
球体 の レイ トレ ー ス が で きま す 。 

ステ レオ グラ フス ックス プロ グラ ム 
ワイ ヤー フレ ー ム ・ フ ラク タル 

人 画面 セー プロ ー ド プロ グラ ム 

⑯ そ の 他 , 画像 サン プル デー タフ ァイル 


ーーーーーーーーーーーーーーーーーーーーーーーーー 


Тк” 
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[mmzarzsatvvz»T-5 | Е ШЕ 
デザ イン ツー ルプ ログ ラム s 


150 X 东京 都 波 谷 区 则 TUS 
Eken ози 


学研 コン ピュ ー タ 出版 「3 次元 グラ ブフ ィ ッ クス 」 係 
② 価 格 


5 イン チ フ ロッ ピー ディ スク 版 (2 ま い 7400 円 ) 
上 記 価 格 に は 荷造 送料 を 含み ませ ん 。 荷 造 送料 
е ご 負担 を お 願い いた LET: 


x. . くだ き КЕТТТІТТІГІ 
に 
Вьт зании nar SEE 


T3 
toti 


受領 し た 前 金 は 。 事情 の いか ん を 間 わ ず 一 切 返金 
いた し ませ ん 。 た だ し 。 リ ー ド エラ ー が あっ た 場 
合 は 現品 と 引き 換え に 代 品 を お 送り し ます 。 
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is soda ・X1 シ S а а の 


直方 」 プ ログ ラム パッ ク を 申し 込み ます 。 


⑧ 下 記 四 し 込み 書 に 必要 事項 を ご 記入 の うえ , NO 
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